问题补充:
我想设计一个vb计算器程序,只能用小键盘输入,只有两个文本框,一个是当前输入数,一个是累计数,按“+”号键就确认一笔数,当前输入的文本框就为空,累计框就加计为新的累计数,当按回车键后也与“+”号键一样,但还要多一项功能就是结束本组数字的计算,再输入的数字即为新的数字了.不要有乘、除法,只要加减法,即键盘上只认0~9,小数点、+、-、回车、退格键.其他的键一律不认.现在的问题是,我按+号当成了数字输
答案:
Text1输入,Text2结果
Private Sub Text1_KeyPress(KeyAscii As Integer)
Static int1 As Integer
Debug.Print KeyAscii 45-,43+
If KeyAscii = 45 Or KeyAscii = 43 Then
+,- If int1 = 0 Then
Text2.Text = Val(Text1.Text)
ElseText2.Text = Val(Text2.Text) + int1 * Val(Text1.Text)
End If Text1.Text =
int1 = (44 - KeyAscii)
KeyAscii = 0
ElseIf (KeyAscii 57) Then
KeyAscii = 0
取消输入 Else End IfEnd Sub
我想设计一个vb计算器程序 只能用小键盘输入 只有两个文本框 一个是当前输入数 一个是累计数 按“+