COMDLG32.DLL 为我们提供了一些很有用的对话框，但是仍然有部分我们可能会用到的系统对话框它却没有提供。如果试图复制这些系统对话框将是一件麻烦的苦差事。幸好shell32.dll为我们提供了这些对话框，本文将带你去发掘一些未公开的API函数，以实现这些对话框。 

在使用未公开的API函数之前，你必须知道声明未公开的API函数与声明那些公开的API函数略有不同，那就是，你必须用到未公开API函数的顺序号(ordinal number)。这个顺序号就是未公开函数的别名。也就是说在声明未公开API函数时，必须加上它的别名。例如下面要说到的PickIconDlg函数的顺序号为62，它的别名就是"#62"。如果不这样做，系统会提示你找不到函数的入口点。 

选取图标 

BOOL WINAPI PickIconDlg( 
HWND hwndOwner, 
LPSTR lpstrFile, 
DWORD nMaxFile, 
LPDWORD lpdwIconIndex); 
该函数的顺序号为62。 

hwndOwner拥有该对话框的窗口句柄 lpstrFile指向一个缓冲，包含初始的文件名。函数返回后它就包含新的文件名。nMaxFile指定缓冲的大小，以字符为单位。 lpdwIconIndex指向一个变量其中包含基于零的图标的索引。函数返回后它包含新图标的索引值。 如果用户选择了图标，则返回值为真，如果用户选择取消按钮或是系统菜单的关闭选项则返回值为假。 

运行程序对话框 

void WINAPI RunFileDlg( 
HWND hwndOwner, 
HICON hIcon, 
LPCSTR lpstrDirectory, 
LPCSTR lpstrTitle, 
LPCSTR lpstrDescription, 
UINT uFlags); 
该函数的顺序号为61。在VB中可声明如下： 

Private Declare Function RunFileDlg Lib "shell32" Alias "#61" (ByVal hwndOwner As Long, ByVal hIcon As Long, ByVal lpstrDirectory As String, ByVal lpstrTitle As String, ByVal lpstrDescription As String, ByVal uFlags As Long) As Long 

其中uFlags参数的可选值为 

RFF_NOBROWSE 0x01 Removes the browse button. 
RFF_NODEFAULT 0x02 No default item selected. 
RFF_CALCDIRECTORY 0x04 Calculates the working directory from the file name. 
RFF_NOLABEL 0x08 Removes the edit box label. 
RFF_NOSEPARATEMEM 0x20 Removes the Separate Memory Space check box (Windows NT only).