vb编程计算器怎么用

1. 如何用VB做简易的四则运算计算器

很简单的：窗口放入四个COMMAND控件（Caption属性分别为+、－、X、÷），三个TEXT控件，再放入三个Label控件（Caption属性分别为：操作数1、操作数2和计算结果），窗口的Caption属性改为“四则运算”
代码如下：
Private Sub Command1_Click()
If Val(Text1.Text) + Val(Text2.Text) <> Int(Val(Text1.Text) + Val(Text2.Text)) Then
Text3.Text = Format(Val(Text1.Text) + Val(Text2.Text), "0.######")
Else
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End If
End Sub
Private Sub Command2_Click()
If Val(Text1.Text) - Val(Text2.Text) <> Int(Val(Text1.Text) - Val(Text2.Text)) Then
Text3.Text = Format(Val(Text1.Text) - Val(Text2.Text), "0.######")
Else
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
End If
End Sub
Private Sub Command3_Click()
If Val(Text1.Text) * Val(Text2.Text) <> Int(Val(Text1.Text) * Val(Text2.Text)) Then
Text3.Text = Format(Val(Text1.Text) * Val(Text2.Text), "0.######")
Else
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
End If
End Sub
Private Sub Command4_Click()
If Val(Text1.Text) / Val(Text2.Text) <> Int(Val(Text1.Text) / Val(Text2.Text)) Then
Text3.Text = Format(Val(Text1.Text) / Val(Text2.Text), "0.######")
Else
Text3.Text = Val(Text1.Text) / Val(Text2.Text)
End If
End Sub

2. 怎样用vb编程一部简单的计算器呢

1、打开VB新建一个EXE。

3. 如何用vb编写简单计算器

不知道你想要哪种，偶是新手，只会最简单的
首先拖出三个text，再拖出4个Command按钮 caption分别为+ - * / 这样就准备就绪了
先讲一下简单用法，第一个text是第一个加数/被减数/因数/被除数，而第二个text是第二个加数/减数/因数/除数，第三个text是和/差/积/商，在text1输入一个数，text2输入一个，然后分别点击command“+ - * /”text3就会出现结果
然后随便单击一个窗口，把里面的文字删去，再写上：
Private Sub Command1_Click()
Text3.Text = Str$(Val(Text1.Text) + Val(Text2.Text))
End Sub

Private Sub Command2_Click()
Text3.Text = Str$(Val(Text1.Text) - Val(Text2.Text))
End Sub

Private Sub Command3_Click()
Text3.Text = Str$(Val(Text1.Text) * Val(Text2.Text))
End Sub

Private Sub Command4_Click()
Text3.Text = Str$(Val(Text1.Text) / Val(Text2.Text))
End Sub
然后运行，应该就可以了