Question

vb中keydown问题

Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As

Integer)
Combo1 = Combo1.Text
Select Case Combo1.Text
Case "AGZN"
form2.Show
form1.Hide
End Sub 我想得到的是：当按下enter键才实现功能，当按其他键不做任何处理，该怎么限制，谢谢帮忙

Answer 1

在你的程序中，你按下A时，同时激活KeyPress和KeyDown事件 分析一下不难看出，程序运行结果是合理的 你按的键盘上的这个键的keycode为88，而A的ascii值为88 a的ascii值为98 明白了么？

Answer 2

Private Sub Combo1_KeyDown(KeyCode As Integer, Shift As Integer)

if keycode = 13 then

Combo1 = Combo1.Text
Select Case Combo1.Text
Case "AGZN"
form2.Show
form1.Hide

endif

End Sub