VB.NET code:
If CheckBox1.Checked = True Then
nlen1 = Asc2Hex(原值, OldData1)
Call Asc2Hex(修改, NewData1)
[color=#FF0000]ReadProcessMemory(pHandle, lOffset(0), rData1(0), nlen1, 0)[/color]
If ByteCmp(rData1, OldData1) Then
If CheckBox1.Checked = True Then
WriteProcessMemory(pHandle, lOffset(0), NewData1(0), nlen1, 0)
Call Play_Y.PlaySoundResource("Click_Ok.wav")
Me.Label1.Font = New Font(Me.Label1.Font, Me.Label1.Font.Style Or FontStyle.Bold)
End If
Else
If ByteCmp(rData1, NewData1) Then
If CheckBox1.Checked = False Then
WriteProcessMemory(pHandle, lOffset(0), OldData1(0), nlen1, 0)
Call Play_Y.PlaySoundResource("Click_No.wav")
Me.Label1.Font = New Font(Me.Label1.Font, Me.Label1.Font.Style And Not FontStyle.Bold)
End If
End If
End If
End If
在VB6下运行OK,在VB.NET下运行就出错了..
希望有人能告诉我一下.谢谢
把 API ReadProcessMemory(pHandle, lOffset(0), rData1(0), nlen1, 0)的声明贴出来,
然后把你传入变量的类型与值的代码贴出来
因为VB.N
