Question

关于vb的keydown问题...

我在做一个期末考的小游戏..打字的嗯
我想用keydown语句来写当我按下字母时然后图片会重新返回去就像什么打苹果那样
然后却怎么按都没有反应啊啊啊啊啊啊
语句如下
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
For i = 0 To 4
If KeyCode = Label1(i).Caption Then
Label4.Caption = Label4.Caption + 1
Picture2(i).Top = 6000 + (Rnd * 50 + 50)
Label1(i).Caption = Chr(Fix(Rnd * 26) + vbKeyA)
End If
Next i
End Sub
label1(i)就是我要按的字母 picture2(i)就是会弹回去的那些图片 label4计分的..结果怎么按都没用反应啊啊啊啊 求解决

Answer 1

keycode是用来区分你按了哪个键，keyascii用来区分你输入了哪个字符，

如：a和A是同一个键，他们的keycode是相同的，而ascii值是不同的。

键盘上方的1和右边小键盘的1，不是同一个键所以keycode不同，而

keyascii相同。

在你的程序中，你按下A时，同时激活KeyPress和KeyDown事件

分析一下不难看出，程序运行结果是合理的

你按的键盘上的这个键的keycode为65，而A的ascii值为65

a的ascii值为97

明白了么？
希望能解决您的问题。

追问

那我怎么改才能使if下面那堆东西有效果呢