vb中,怎么写代码,让程序能够识别我在text里写的一个数学公式,并且按照给定的值进行计算比如,输入3x+1,然后程序自动识别这个公式,把给定的值代入进行计算
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/06 01:04:00
![vb中,怎么写代码,让程序能够识别我在text里写的一个数学公式,并且按照给定的值进行计算比如,输入3x+1,然后程序自动识别这个公式,把给定的值代入进行计算](/uploads/image/z/4505984-8-4.jpg?t=vb%E4%B8%AD%2C%E6%80%8E%E4%B9%88%E5%86%99%E4%BB%A3%E7%A0%81%2C%E8%AE%A9%E7%A8%8B%E5%BA%8F%E8%83%BD%E5%A4%9F%E8%AF%86%E5%88%AB%E6%88%91%E5%9C%A8text%E9%87%8C%E5%86%99%E7%9A%84%E4%B8%80%E4%B8%AA%E6%95%B0%E5%AD%A6%E5%85%AC%E5%BC%8F%2C%E5%B9%B6%E4%B8%94%E6%8C%89%E7%85%A7%E7%BB%99%E5%AE%9A%E7%9A%84%E5%80%BC%E8%BF%9B%E8%A1%8C%E8%AE%A1%E7%AE%97%E6%AF%94%E5%A6%82%2C%E8%BE%93%E5%85%A53x%2B1%2C%E7%84%B6%E5%90%8E%E7%A8%8B%E5%BA%8F%E8%87%AA%E5%8A%A8%E8%AF%86%E5%88%AB%E8%BF%99%E4%B8%AA%E5%85%AC%E5%BC%8F%2C%E6%8A%8A%E7%BB%99%E5%AE%9A%E7%9A%84%E5%80%BC%E4%BB%A3%E5%85%A5%E8%BF%9B%E8%A1%8C%E8%AE%A1%E7%AE%97)
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