关于VB控制驱动类问题

Question

首先，我对VB很不了解，我是菜鸟，提问方式有错误的话，请大家理解，我直接用VB加载后，出现错误有朋友愿意解释下这个具体作用吗？Public Type DriverDataType
    PID As Long
    MAddress As Long
    MValue As Long
End Type
Public Sub WriteProcessMemoryEx(ByVal PID As Long, ByVal PAddress As Long, ByVal PValue As Long)
'向指定的进程空间写入任意值
DriverIOData.PID = PID
DriverIOData.MAddress = PAddress
DriverIOData.MValue = PValue
DriverLoader.IoControl 22241, VarPtr(DriverIOData), Len(DriverIOData), 0, 0   '与驱动通信，完成内存写入功能
，控制码是22241
End Sub 

Answer 1

把DriverIOData结构体写入到驱动

Answer 2

Private Declare Function XXX Lib "d:\aaa.dll" Alias "Function1" (ByVal s1 As String, ByVal s2 As String) As Long
直接用VB加载出现错误的话，你用这种方式直接引用试试

Answer 3

'不知道错误是怎么提示的?Private Type DriverDataType
  PID As Long
  MAddress As Long
  MValue As Long
End Type
Public Sub WriteProcessMemoryEx(ByVal PID As Long, ByVal PAddress As Long, ByVal PValue As Long)
'向指定的进程空间写入任意值
dim DriverIO as DriverDataType
DriverIO.PID = PID
DriverIO.MAddress = PAddress
DriverIO.MValue = PValue
DriverLoader.IoControl 22241, VarPtr(DriverIOData), Len(DriverIOData), 0, 0 '与驱动通信，完成内存写入功能
，控制码是22241
End Sub