两个command
一个是 输入两个加数
另一个是 显示等式
输入加数要用inputbox来输入
最后按 显示公式键 在窗体上print出公式！！
谢谢各位vb高手！！

我想知道代码怎么写

Public a As String
Private Sub Command1_Click()
a = InputBox("请输入算法例如1+1", "大家一起算算术")
End Sub
Private Sub Command2_Click()
For i = 1 To Len(a)
If Mid(a, i, 1) = "+" Then
b = Val(Mid(a, 1, i - 1)) + Val(Mid(a, i + 1, Len(a) - i))
End If
Next i
Print a & "=" & b
End Sub


谢谢3L，能不能两个数分别输入两个inputbox里，最后而不是输入a+b形式的？

能不能两个数分别输入两个inputbox里，而不是输入a+b形式的？
最后再显示等式