题干

模拟一个简单计算器,输入两个数和一个运算符(加、减、乘、除),进行算术运算,并输出运算结果。程序界面如第14题图所示,在文本框Text1输入第一个数a,在文本框Text2输入第二个数b,在文本框Text3输入运算符ch,在文本框Text4中输出结果。

当输入的运算符不是加、减、乘、除四种运算符时,则输出“运算符不正确”;当进行除法运算时,如果除数为0,提示输出“除数不能为零”。相应的Visual Basic程序如下,在①和②划线处,填入合适的语句或表达式,把程序补充完整。

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

上一题 下一题 0.0难度 选择题 更新时间:2012-07-13 02:07:42

答案(点此获取答案解析)