如何用VB做简易的四则运算计算器
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/22 10:57:44
如何用VB做简易的四则运算计算器
如图 谢谢!
![如何用VB做简易的四则运算计算器](/uploads/image/z/2777463-63-3.jpg?t=%E5%A6%82%E4%BD%95%E7%94%A8VB%E5%81%9A%E7%AE%80%E6%98%93%E7%9A%84%E5%9B%9B%E5%88%99%E8%BF%90%E7%AE%97%E8%AE%A1%E7%AE%97%E5%99%A8)
dim a as integer
dim b as integer
a=text1.text
b=text2.text
Private Sub Command1_Click()
text3.text=val(a+b)
end sub
Private Sub Command2_Click()
text3.text=val(a-b)
end sub
Private Sub Command3_Click()
text3.text=val(a*b)
end sub
Private Sub Command4_Click()
text3.text=val(a/b)
end su
dim b as integer
a=text1.text
b=text2.text
Private Sub Command1_Click()
text3.text=val(a+b)
end sub
Private Sub Command2_Click()
text3.text=val(a-b)
end sub
Private Sub Command3_Click()
text3.text=val(a*b)
end sub
Private Sub Command4_Click()
text3.text=val(a/b)
end su