怎么让在输入计算器数字的时候 只有鼠标为真 键盘为假呢

来源:百度知道 编辑:UC知道 时间:2024/05/05 21:35:23
也就是按键盘无操作 不然连英文都输入进去计算了
就是 计算器 内容结果都要在文本框中出现 用键盘不可以输入数字啊 字符之类的命令

1.可以不用 TEXT,用LABEL 呀,LABEL不会接收键盘输入
2.如果非要用 TEXT,且只接收数字.
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not IsNumeric(Chr(KeyAscii)) Then KeyAscii = 0
End Sub
'啥都不接收
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub

手头没环境,提供个思路,平时文本框是locked=true,在鼠标点数字的时候即command_click事件时locked=false,修改完内容后再locked=true

计算器一般使用Label控件作为输出就可以了.