vb中,怎么写代码,让程序能够识别我在text里写的一个数学公式,并且按照给定的值进行计算比如,输入3x+1,然后程序自动识别这个公式,把给定的值代入进行计算
来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/21 02:43:23
vb中,怎么写代码,让程序能够识别我在text里写的一个数学公式,并且按照给定的值进行计算比如,输入3x+1,然后程序自动识别这个公式,把给定的值代入进行计算
vb中,怎么写代码,让程序能够识别我在text里写的一个数学公式,并且按照给定的值进行计算
比如,输入3x+1,然后程序自动识别这个公式,把给定的值代入进行计算
vb中,怎么写代码,让程序能够识别我在text里写的一个数学公式,并且按照给定的值进行计算比如,输入3x+1,然后程序自动识别这个公式,把给定的值代入进行计算
'引用 Microsoft Script Control 1.0 '
应该是你说的,但你说的3x 这样的公式 要写成 3*x 了,如果不行,另找好的代码 ,呵!但怎么用你也可以学一下 ScriptControl
Option Explicit
Private Sub Command1_Click()
On Error GoTo E
Dim ScriptControl1 As New ScriptControl
Dim strVBS As String
ScriptControl1.Language = "VBScript"
Dim strCode As String
strCode = "function DivideByZero()" & vbCrLf & _
IIf(Len(Text3.Text), "dim " & Text3.Text & vbCrLf, "") & _
Text1.Text & vbCrLf & _
"DivideByZero=(" & Text2.Text & ")" & vbCrLf & _
"End function"
With ScriptControl1
.AddCode strCode
Text4.Text = .Run("DivideByZero")
End With
Exit Sub
E:
MsgBox "错误:" & Err.Number & vbCrLf & Err.Description, , "错误:" & Err.Number
End Sub