作业帮 > 综合 > 作业

VB多项式化简例如((x+1)^2)*((y-x)^3)结果用x和y 表示.

来源:学生作业帮 编辑:灵鹊做题网作业帮 分类:综合作业 时间:2024/05/14 09:30:54
VB多项式化简
例如((x+1)^2)*((y-x)^3)
结果用x和y 表示.
VB多项式化简例如((x+1)^2)*((y-x)^3)结果用x和y 表示.
'自定义计算函数
Function JS(ByVal Expressions As String) As String
Dim Mssc As Object
Set Mssc = CreateObject("MSScriptControl.ScriptControl")
Mssc.Language = "vbscript"
On Error GoTo EvalErr
JS = Mssc.Eval(Expressions)
Exit Function
EvalErr:
Exit Function
End Function
Private Sub Command1_Click()
'引用函数举例:
x = 10
Y = 11
T = "((" & x & "+1)^2)*((" & Y & "-" & x & ")^3)"
MsgBox T & "=" & JS(T)
End Sub
'请采纳!谢谢!