Question

vb 怎样将变量实现算术运算符的功能

高手救命啊，， 就是在窗体 print 5+3 ，则窗体会显8,, 但可以使用一个变量代表算术运算符吗，比如有一个变量A=“+”，怎样通过窗体显8啊，，我用print 5 A 3 语法错误哦， 怎样实现得到8啊，救命啊，高手，50分哦，

Answer 1

Private Sub Command1_Click()
a = "+"
Print ExpressionsEvaluate(3 & a & 5)
End Sub

Public Function ExpressionsEvaluate(ByVal strExpressions As String) As Currency
Dim objEvaluate As Object

On Error GoTo LocalErr

'// 创建一个脚本对象
Set objEvaluate = CreateObject("MSScriptControl.ScriptControl")

With objEvaluate
'// 设置脚本语言为 VBScript
.Language = "VBScript"
'// 利用 VBScript 脚本的 Eval 函数来计算表达式
ExpressionsEvaluate = .Eval(strExpressions)
End With

Set objEvaluate = Nothing
Exit Function
LocalErr:
Err.Clear
ExpressionsEvaluate = 0
Set objEvaluate = Nothing
End Function

Answer 2

if a="+" then print 5+3

多做几个选择

select case a
case "+"
print 5+3
case "-"
print 5-3
case "*"
print 5*3
case "/"
print 5/3
end select

Answer 3

还是使用判断 A 的值来计算，
如果 A 为 "+" ，则 5+3
如果 A 为 "-" , 则为 5-3
A 的可能性应该有限吧