vb 字符串中连同字母转换为数值数据

来源：百度知道 编辑：UC知道 时间：2024/05/19 00:23:23
我的意思是将text1.text赋值给f
但是要连同字母，当成数值变量
如text1.text="x+3"
赋给f后要变成f=x+3，即一个数学函数（f是双精度浮点数）
应该怎么办？代码要简单一点，最好不要有引用

首先添加部件：
工程--部件--Microsoft Script Control 1.0
代码：
Private Sub Command1_Click()
text1.text="1000*200/52+54"
f = ScriptControl1.Eval(Text1.Text)
MsgBox f
End Sub
'这个text1里是不能带 参数的 如：你的X,若你非要带X
'那只好 定义过程用ScriptControl1.AddCode 定义过程 。
'用ScriptControl1.run 调用过程

你的意思是将输入的内容转换为数学表达式，如果用一个文本框我认为比较困难，也不可能实现。
你可以使用多个文本框，有的输入数字，有的输入运算符，有的输入运算变量，这样比较好处理。