#1 vb问题(3)
请看下面一段程序：

（声明API函数部分省略。。。）
Private Sub Command1_Click()
Dim i As Byte , Data As Byte , MyStr As String*1
For i=0 To 255
Data=i
WriteProcessMemory MyProcess, Address, Data, 1, 0&
ReadProcessMemory MyProcess, Address, MyStr, 1, 0&
Data=Asc(MyStr)
Debug.Print Data
Next i
End Sub

问题是，程序运行后，显示如下结果：
[quote]0
1
2
3
4
5
中间省略……
124
125
126
127
0
0
0
中间省略……
0
0
0
[/ ..

#1 >>下页

论坛:设计与修改
主题:vb问题(3)
下一主题:曹操传武器形象怎么修 ...