）试编写一段程序： 输入两个数，并可用命令按钮选择执行加、减、乘、除运算。 在窗体上创建两个文本框用
发布网友
发布时间：2022-05-12 16:42
共1个回答
热心网友
时间：2023-10-14 02:07
dim a,b
a=val(text1.text)
b=val(text2.text)
msgbox a & "+" & b & "=" & (a+b)
end sub
private sub command2_onclick()
dim a,b
a=val(text1.text)
b=val(text2.text)
msgbox a & "-" & b & "=" & (a-b)
end sub
private sub command3_onclick()
dim a,b
a=val(text1.text)
b=val(text2.text)
msgbox a & "*" & b & "=" & (a*b)
end sub
private sub command4_onclick()
dim a,b
a=val(text1.text)
b=val(text2.text)
if b=0 then
msgbox "zero wrong!"
else
msgbox a & "/" & b & "=" & (a/b)
end if
end sub
