Question

vb编程 一个简单的计算 代码如下

a = Val(Text1.Text) b = Text2.Text c = Val(Text3.Text) If a = "" Or c = "" Or b = "" Then MsgBox "请输入数字计算,不能为空" If b <> "+" Or b <> "-" Or b <> "*" Or b <> "/" Then MsgBox ("请输入正确的运算符") If b = "+" Then Text4.Text = a + c If b = "-" Then Text4.Text = a - c If b = "*" Then Text4.Text = a * c If b = "/" Then If c = 0 Then c = MsgBox("除数不能为零") Else Text4.Text = a / c End If End If 不知道哪里错了,各位老师帮忙纠正下

Answer 1

除数为0时
如果你想把提示显示在结果里，应该是
text4.text="除数不能为零"
要是弹出对话框的话，应该是
MsgBox
"除数不能为零"
c=MsgBox
"除数不能为零"神马的都是浮云