VB编程问题! 如何在文本框中输入号后直接按回车开始计算

我本来是第一个回答的，为了把第二，三个问题也解决，修改答案后就成最下边一个了 1.--- 把Text4的MultiLine属性设置成True 复制下边的代码：Private Sub Form_Load()Text4.Text = ""End Sub Private Sub Command1_Click()Text4.Text = Text4.Text + Text1.Text + Text2.Text + Text3....

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)If KeyCode = 13 Then Text2.SetFocus End Sub

Sub s() Text1.MaxLength = 8'设置Text输入最长为8个字符End Sub

将文本框的Text属性设置为你所计算的值，也就是用“=”赋值。

使用文本框的SelText 属性对选定的数据进行操作

在VB中，设置文本框的MultiLine 属性为True，就能使使文本框能够输入多行文字。MultiLine 属性 返回或设置一个值，该值指示 TextBox 控件是否能够接受和显示多行文本。在运行时是只读的。

将在文本框中输入内容的语句放在一个可以运行三次的循环语句中。若三次输入都是错误的，直接退出整个程序即可。

设置一个公共变量记录计算状态.在按下=号键后改变一下此变量的值即可.

If IsEqual = True Then '判断是否按下等于 Text1 = "" '是则清楚当前内容 Else IsEqual = False End If Text1 = Text1 & Index '键入数字1~9 Case 10 To 13 TFlag = Index '记录运算符 TTemp1 = Val(Text1) '记录第一个数 Text1 = "" '清除文本框 Case 14 TTemp2 = Val(...

Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 8 Then KeyAscii = 8 Exit Sub End If If KeyAscii < 47 Or KeyAscii > 58 Then KeyAscii = 0 End If End Sub