不能这样来给 sum 赋值,因为 str 存储的是字符串 "2+3",而非算式。VB 额外提供了一个控件可以根据一个字符串型的算式来计算出得数,在工程-部件里,增加 Microsoft Script Control 1.0,放一个到窗体上,然后输入代码:Private Sub Form_Load() MsgBox ScriptControl1.Eval ("2+3")End If运行时会弹出对话框 "5"。
哦,原来如此。谢谢