eval 为什么不能执行 变量
doxob 2012-07-08 03:42:50 我想用eval 函数执行程序中定义的变量但是不能执行。
Dim evals As New ScriptControl
Private Sub Command4_Click()
evals.Language = "VBScript"
n = 5
Text6.Text = evals.Eval(Text4.Text)
End Sub
如果在Text4文本框中输入5*5执行后可以得出正确结果25.
执行的时候在Text4文本框中输入5*n可是结果并没有得出25,而是得出0.谁能帮我解决。