ioapi.bas

来自「usb2.0驱动」· BAS 代码 · 共 28 行

Attribute VB_Name = "Module1"
Declare Function ReadFile Lib "kernel32" _
(ByVal Handle&, _
BufferPtr As Integer, _
ByVal ByteCount&, _
BytesReturnedPtr&, _
ByVal OverlappedPtr& _
) As Long

Declare Function WriteFile Lib "kernel32" _
(ByVal Handle&, _
BufferPtr As Byte, _
ByVal ByteCount&, _
BytesReturnedPtr&, _
ByVal OverlappedPtr& _
) As Long

Declare Function DeviceIoControl Lib "kernel32" _
(ByVal hDevice&, _
 ByVal dwIoControlCode&, _
 lpInBuffer As Byte, ByVal nInBufferSize&, _
 lpOutBuffer As Byte, ByVal nOutBufferSize&, _
 lpBytesReturned&, _
 lpOverlapped& _
 ) As Long