VB 文字框怎样用键盘控制数字加减？

来源：百度知道 编辑：UC知道 时间：2024/06/07 17:56:21
例如：
Text1为5，当按下键盘↑键则数字增加1（即6）、当按下键盘↓键则数字减少1（即4）。 如何实现？

回答正确追加分

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 38 Then Text1 = Val(Text1) + 1
If KeyCode = 40 Then Text1 = Val(Text1) - 1
End Sub

Keypress事件里添加代码。要检测按键的ASCII代码，做相应的处理就可以了。

在代码处添加可以用键盘控制的代码