Private Declare Function CreateFile Lib "kernel32" Alias "CreateFileA" (ByVal lpFileName As String, ByVal dwDesiredAccess As Long, ByVal dwShareMode As Long, lpSecurityAttributes As SECURITY_ATTRIBUTES, ByVal dwCreationDisposition As Long, ByVal dwFlagsAndAttributes As Long, ByVal hTemplateFile As Long) As LongPrivate Type SECURITY_ATTRIBUTESnLength As LongbInheritHandle As LonglpSecurityDescriptor As LongEnd TypePrivate Sub MYSub_Click()Dim SA As SECURITY_ATTRIBUTESFileHandle =CreateFile("C:\abc.jpeg", GENERIC_WRITE, FILE_SHARE_READ Or FILE_SHARE_WRITE, SA, OPEN_EXISTING, 0, 0)End Sub當執行編譯到CreateFile這行時，編譯器報告說SA這個參數類型不對的錯誤，怎么解決這個問題呢？將SA替換為0或者1等，雖然編譯能夠通過，但得到的FileHandle 句柄值始終為-1，這與事實不符，導致后續的處理無法，要怎么設置這個SA值呢？兩位的方法都調試過了，都仍然報錯，終于找到方法了，將SA 替換為vbNullString之后就成功了，但我不知道是為什么這么替換后就成功了。分數不能浪費，先來先得吧。