神马品牌网肾早期损伤指标2:vb-加法怎么写？
来源：百度文库 编辑：神马品牌网 时间：2024/04/29 01:40:45
我想弄一个弹出对话框的计算器
例：
Private Sub Command11_Click()
a = InputBox("因数1", "算乘法")
b = InputBox("因数2", "算乘法")
Text1.Text = a * b
End Sub
这样的计算器
可是，我再写加法的过程中，例
a = InputBox("加数1", "算加法")
b = InputBox("加数2", "算加法")
Text1.Text = a + b
这样的算式以后算出来的总是像：
1+2=12
5+2=52
2+3=23
这样的把某数合并的，能不能将某数相加，向我刚才的类型的。。。。
谢谢，我又重赏。。。。
例：
Private Sub Command11_Click()
a = InputBox("因数1", "算乘法")
b = InputBox("因数2", "算乘法")
Text1.Text = a * b
End Sub
这样的计算器
可是，我再写加法的过程中，例
a = InputBox("加数1", "算加法")
b = InputBox("加数2", "算加法")
Text1.Text = a + b
这样的算式以后算出来的总是像：
1+2=12
5+2=52
2+3=23
这样的把某数合并的，能不能将某数相加，向我刚才的类型的。。。。
谢谢，我又重赏。。。。
利用val和str函数进行字符与数值型的转换
Text1.Text = str（val（a） + val（b））
这样试试吧：
a=val(InputBox("加数1", "算加法"))
b=val(InputBox("加数2", "算加法"))
Text1.Text = a + b