Question

vb中我在文本框截取到“+”号，但不能直接运算，怎么转换成运算符呀

如题，我是想做一个简单的计算器，我在文本框可得到如下 “123 + 456”
我在输入的时候会加上空格，然后我用split分别截取这3部分，
两头的数字我可以用val将其转成数值型，
但是中间的“+”，截取到是文本型的，用什么能转化成运算符型呢
否则没法参加运算呀
Private Sub 等于_Click()
a = Val(Split(Text3.Text)(0))
b = Split(Text3.Text)(1)
c = Val(Split(Text3.Text)(2))
Text3.Text = a & b & c
End Sub

这是我的代码，text3就是 数字+空格+运算符+空格+数字 的格式
运算符有可能是+-*/任何一种

Answer 1

我学得应该至少放四个文本框，两个文本框存放输入的操作数，中间的放运算符号，最后的放结果。然后在代码中用select case进行判断。

Select Case Text2.Text
    Case '+'
        Text4.Text=Val(Text1.Text)+Val(Text2.Text)
    Case '-'
        Text4.Text=Val(Text1.Text)-Val(Text2.Text)
    Case '*'
        Text4.Text=Val(Text1.Text)*Val(Text2.Text)
    Case '/'
        Text4.Text=Val(Text1.Text)/Val(Text2.Text)
End Select

Answer 2

那就这样：

Private Sub 等于_Click()
Dim a As Single, b As String, c As Single
a = Val(Split(Text3.Text)(0))
b = Split(Text3.Text)(1)
c = Val(Split(Text3.Text)(2))
Select Case b
Case "+"
Text3.Text = a + c
Case "-"
Text3.Text = a - c
Case "*"
Text3.Text = a * c
Case "/"
Text3.Text = a / c
End Select
End Sub

Answer 3

if x = "+" then
   c = val(a) + val(b)
end if