一个运算处理问题 怎样可以让 "6+3"=9 成立就是让一个字符串算式 可以计算出结果拜托 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 cint("6+3")?是这样的吗 '需先引用Microsoft Script Control 1.0Dim sc As New ScriptControlsc.Language = "vbscript"Text1.Text = "1+2*3"Debug.Print sc.Eval(Text1.Text)'结果:7 有两个例子的:'需先引用Microsoft Script Control 1.0Dim sc As New ScriptControlDim str As Stringsc.Language = "vbscript"str = "1+2*3"Debug.Print sc.Eval(str)'结果:7str = "1+2*3=7"Debug.Print sc.Eval(str)'结果:True If InStr(1, t, "类型") Or InStr(1, t, "型号") then 这句代码是什么意思 关于读取txt文件 我添加了几个控件,然后,我想下次打开VB6.0时,这几个控件还存在,该怎么做? 重新启动机器 一个简单的数据库问题 rs.open "sql" 会返回什么,怎样算执行成功,失败又怎样分辨类型? 这是什么控件实现的阿 ## 如何写一个文件检索的程序?100分 如何将Excel文件中的数据转置? MDI主窗体问题 数据库+报表 VB 自带的报表分组问题!
是这样的吗
sc.Language = "vbscript"
Text1.Text = "1+2*3"
Debug.Print sc.Eval(Text1.Text)'结果:7
'需先引用Microsoft Script Control 1.0Dim sc As New ScriptControl
Dim str As String
sc.Language = "vbscript"
str = "1+2*3"
Debug.Print sc.Eval(str)
'结果:7str = "1+2*3=7"
Debug.Print sc.Eval(str)'结果:True