模拟一个简单计算器，输入两个数和一个运算符（加、减、乘、除），进行算术运算，并输出运算结果。程序界面如图所示，在文本框Text1输入第一个数a,在文本框Text2输入第二个数b,在文本框Text3输入运算符ch,在文本框Text4中输出结果。当输入的运算符不是加、减、乘、除四种运算符时，则输出“运算符不正确”；当进行除法运算时，如果除数为0，提示输出“除数不能为零”。相应的Visual Basic程序如下，
（1）观察程序设计界面，共有类对象具有Caption属性。
（2）实现上述功能的VB程序如下在①、②、③横线处，填入合适的语句或表达式，把程序补充完整。
Private Sub Command1_Click （　　）
Dim a As Single,b As Single,ch As String
a=Val（Text1．Text）
b=Val（Text2．Text）

①

①

If ch=“+“Then
Text4．Text=Str（a+b）
ElseIf ch=“*“Then
Text4．Text=Str（a*b）
ElseIf ch=“-“Then
Text4．Text=Str（a-b）
ElseIf ch=“/“Then
If

②

②

Then Text4．Text=Str（a/b） Else Text4．Text=“除数不能是零“
Else

③

③

End If
End Sub