如何使用VB设计一个计算器？

Question

如何使用VB设计一个计算器。我不会用VB。 目的：输入A、B、C三个数，得到一个结果DD=【（A-0.3）*（B-3）*（C-15）】/【（7.5-0.3）*（68-3）*（270-15）】
谢谢了，谁会的做个给我吧，谢谢了

Answer 1

好像有个叫什么的，一时想不想了。
调用下calc吧。加点sendkey。

Answer 2

Private Sub Command1_Click()
Dim D
D = ((Val(Text1) - 0.3) * (Val(Text2) - 3) * (Val(Text3) - 15)) / ((7.5 - 0.3) * (68 - 3) * (270 - 15))
Text4 = Format(D, "0.00")
End SubPrivate Sub Form_Load()
Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
End Sub

Answer 3

你在窗体上放三个文本框,用来输入A、B、C的值，点击Command1计算，结果显示在第四个文本框里。

Answer 4

你只要将代码拷到窗体就行了,其它就是运行了,简单吧
Private Sub Form_Load()
Dim A As Double
Dim B As Double
Dim C As Double
 A = Val(InputBox("输入A的值:", "数据输入"))
 B = Val(InputBox("输入B的值:", "数据输入"))
 C = Val(InputBox("输入c的值:", "数据输入"))
 Dim D
D = ((A - 0.3) * (B - 3) * (C - 15)) / ((7.5 - 0.3) * (68 - 3) * (270 - 15))
MsgBox Format(D, "0.00")
End Sub

Answer 5

老张真是耐心呀，没有办法，lz不懂vb,也只能苦口婆心了。
只是lz 不会竟然敢接活......

Answer 6

推荐一个示例程序，可以直接用，还有源代码，LZ一定试下。
http://download.csdn.net/detail/txzsp/3781512