| VB声明 | ||
| Declare Function GetBinaryType Lib "kernel32" Alias "GetBinaryTypeA" (ByVal lpApplicationName As String, lpBinaryType As Long) As Long | ||
| 说明 | ||
| 判断文件是否可以执行 | ||
| 返回值 | ||
| Long，非零表示成功，零表示失败 | ||
| 参数表 | ||
| 参数 | 类型及说明 | |
| lpApplicationName | String，欲测试文件的完整路径名 | |
| lpBinaryType | Long，用于装载文件类型的一个变量。这些类型由下述任何一个常数定义： | |
| SCS_32BIT_BINARY | win32执行程序 | |
| SCS_DOS_BINARY | DOS执行程序 | |
| SCS_OS216_BINARY | 16位OS/2执行程序 | |
| SCS_PIF_BINARY | 用于执行DOS程序的一个pif文件 | |
| SCS_POSIX_BINARY | 一个Posix应用 | |
| SCS_WOW_BINARY | 16位windows执行程序 | |