1.
小李利用所学的 VB 知识，编写了一个简单计算器：在文本框 Text1 中输入一个加减算式（只包含数字和“ +”、“ -”符号，以“ =”结束），点击“计算”按钮 Command1，计算结果在标签
Label1 上显示。程序运行界面如下图所示：
(1)
要实现程序运行时，单击文本框 Text1 即可将文本 框 清 空 ， 则 应 在 (A 、Command1_Click/B 、 Form_Load/C 、 Text1_Click)事件处理过程中添加语句 Text1.text=””。
(2)
实现上述功能的 VB 程序如下，请在划线处填入合适的代码
(3)
若文本框 Text1 中输入的内容为“ 12*10=”（不包括双引号），单击“计算”按钮后，标签Label1 上将显示： .（A 、 120 / B 、 22 / C
、 0 /D 、程序出错无法显示）
Private Sub Command1_Click
Dim s As String, ch As String, sum As Integer
Dim fh As Integer
s = Text1.Text: fh = 1: p = 0: sum=0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then
p =
Else
sum =
p = 0
If ch = "-" Then
fh = -1
ElseIf ch = "+" Then
fh = 1
End If
End If
Next i
Label1.Caption = Str(sum)
End Sub
【考点】
算法的控制结构;
