怎样使用VB编写有加减乘除功能的计算器?

提供代码,能使用的,在加200分... 提供代码,能使用的,在加200分 展开
 我来答
cy20090312
2012-10-19
知道答主
回答量:2
采纳率:0%
帮助的人:2.8万
展开全部
Dim s, a, b As Double
Private Sub Command1_Click()
s = Text1.Text
b = Text2.Text
a = s + b
End Sub
Private Sub Command2_Click()
a = Text1.Text - Text2.Text
End Sub
Private Sub Command3_Click()
a = Text1.Text * Text2.Text
End Sub
Private Sub Command4_Click()
a = Text1.Text / Text2.Text
End Sub
Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
Private Sub Command6_Click()
Text3.Text = a
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式