关于vb,一个按钮, 其中第二个text
新建四个text,一个按钮,其中第二个text要求能输入运算符(+-x/),第一个和第三个文本框能输入数,点击按钮第四个能输入结果,求完全代码!!!~~help!~大致说...
新建四个text,一个按钮, 其中第二个text 要求能输入运算符(+ -x /),第一个和第三个文本框能输入数,点击按钮第四个能输入结果,求完全代码!!!
~~help!~ 大致说下代码也好!拜托大家 展开
~~help!~ 大致说下代码也好!拜托大家 展开
4个回答
展开全部
在点击按钮的过程中加入:
If Text1 = "" Or Text2 = "" Or Text3 = "" Then
MsgBox "请填写完整!", , "提示"
Else
If Val(Text1) Or Val(Text3) Then
Select Case Text2.Text
Case "+"
Text4.Text = Val(Text1.Text) + Val(Text3.Text)
Case "-"
Text4.Text = Val(Text1.Text) - Val(Text3.Text)
Case "×"
Text4.Text = Val(Text1.Text) * Val(Text3.Text)
Case "/"
Text4.Text = Val(Text1.Text) / Val(Text3.Text)
End Select
Else
MsgBox "请输入数值型?", , "提示"
End If
End If
If Text1 = "" Or Text2 = "" Or Text3 = "" Then
MsgBox "请填写完整!", , "提示"
Else
If Val(Text1) Or Val(Text3) Then
Select Case Text2.Text
Case "+"
Text4.Text = Val(Text1.Text) + Val(Text3.Text)
Case "-"
Text4.Text = Val(Text1.Text) - Val(Text3.Text)
Case "×"
Text4.Text = Val(Text1.Text) * Val(Text3.Text)
Case "/"
Text4.Text = Val(Text1.Text) / Val(Text3.Text)
End Select
Else
MsgBox "请输入数值型?", , "提示"
End If
End If
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询