最好给我传到QQ上
QQ：821805519
O(∩_∩)O谢谢啦
我是新手 最好直接给我成品
首先，创建两个文本框，命名为aTextbox和bTextbox
再创建一个文本框，命名为sumTextbox
再创建4个按钮，命名为 aButton bButton cButton dButton
-------------
我们最终的效果将会是这样：
单击aButton就将aTextbox和bTextbox相加，显示在sumTextbox里
单击bButton就相减
单击cButton就相乘
单击dButton就相除
-------------
代码：（不要直接复制！自己看明白了再自己写，对你有好处！）
在aButton的Click事件中加入：
sumTextbox.text= Val(aTextbox.text) + Val(bTextbox.text)
在bButton的Click事件中加入：
sumTextbox.text= Val(aTextbox.text) - Val(bTextbox.text)
在cButton的Click事件中加入：
sumTextbox.text= Val(aTextbox.text) * Val(bTextbox.text)
在dButton的Click事件中加入：
sumTextbox.text= Val(aTextbox.text) / Val(bTextbox.text)
这也是我百度上找到的，自己研究吧。很简单的。
再创建一个文本框，命名为sumTextbox
再创建4个按钮，命名为 aButton bButton cButton dButton
-------------
我们最终的效果将会是这样：
单击aButton就将aTextbox和bTextbox相加，显示在sumTextbox里
单击bButton就相减
单击cButton就相乘
单击dButton就相除
-------------
代码：（不要直接复制！自己看明白了再自己写，对你有好处！）
在aButton的Click事件中加入：
sumTextbox.text= Val(aTextbox.text) + Val(bTextbox.text)
在bButton的Click事件中加入：
sumTextbox.text= Val(aTextbox.text) - Val(bTextbox.text)
在cButton的Click事件中加入：
sumTextbox.text= Val(aTextbox.text) * Val(bTextbox.text)
在dButton的Click事件中加入：
sumTextbox.text= Val(aTextbox.text) / Val(bTextbox.text)
这也是我百度上找到的，自己研究吧。很简单的。
温馨提示：答案为网友推荐，仅供参考
第1个回答 2012-10-08
10大洋！帮你做。。。
有个现成的语音计算器，20大洋。。
第2个回答 2012-10-07
没听清楚楼主要干什么。是做计算器还是那个扑克牌游戏追问
是计算器
追答百度一下，你就知道了！！
请在窗体上放2个textbox(文本框）和4个commandbutton(命令按钮)和1个label(标签),再输入以下代码 ：
Dim a%, b%, c%
Private Sub Command1_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a + b
Label1.Caption = Label1.Caption & c
End Sub
Private Sub Command2_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a * b
Label1.Caption = Label1.Caption & c
End Sub
Private Sub Command3_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a - b
Label1.Caption = Label1.Caption & c
End Sub
Private Sub Command4_Click()
a = Val(Text1.Text)
b = Val(Text2.Text)
c = a / b
Label1.Caption = Label1.Caption & c
End Sub
第3个回答 2012-10-07
网上有一个开头是＂序言--不在游戏＂的教程，里面有个叫做计算器的（被度文库理由）
