我正在看一本VB6 USB編程的書，《8051單片機USB介面Visual Basic程式設計》
看到第12章，取得設備的標示代號：
原程式為：
Public Declare Function CreateFile _
Lib "kernel32" _
Alias "CreateFileA" _
(ByVal lpFileName As String, _
ByVal dwDesiredAccess As Long, _
ByVal dwShareMode As Long, _
ByRef lpSecurityAttributes As Long, _
ByVal dwCreationDisposition As Long, _
ByVal dwFlagsAndAttributes As Long, _
ByVal hTemplateFile As Long) _
As Long
執行效果如下：
提示記憶體位置訪問無效。
后來下載了一個例程，
Dim Security As SECURITY_ATTRIBUTES
Public Declare Function CreateFile _
Lib "kernel32" _
Alias "CreateFileA" _
(ByVal lpFileName As String, _
ByVal dwDesiredAccess As Long, _
ByVal dwShareMode As Long, _
ByRef lpSecurityAttributes As SECURITY_ATTRIBUTES, _
ByVal dwCreationDisposition As Long, _
ByVal dwFlagsAndAttributes As Long, _
ByVal hTemplateFile As Long) _
As Long
執行效果如圖：
為什么會這樣呢？請高手指教，謝謝！
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/15123.html
標籤：API