(急!!在线等待....)我想将某个公式赋值给一个变量a,然后将该公式计算结果赋值给b,请教怎样做法?

Question

我想把某个公式赋值给一个变量a,然后将该公式计算结果赋值给b,请教怎样做法?
例:公式为n1+n2
a=n1+n2
则怎样把a的计算结果赋值给b

Answer 1

公式中的n1和n2都是变量
我的意思是先把公式赋值给a,然后计算a将公式计算结果赋值给b

Answer 2

怎么附值?你举个例子
a=n1+n2
b=a不行吗

Answer 3

Option Explicit'Reference Microsoft Script Control 1.0
Private Sub Form_Load()
    Dim a As String
    Dim b As Long
    Dim o As ScriptControl
    
    a = "1+2"
    Set o = New ScriptControl
    o.Language = "VBScript"
    b = o.Eval(a)
    MsgBox b
    Set o = Nothing
End Sub

Answer 4

to tztz520(午夜逛街):
如果写成:
a=n1+n2
b=a
b的值跟a的值是一样的,也就是b=n1+n2
我要先把n1+n2这个公式赋值给a
然后b的值通过变量a计算出公式的结果,并把结果值赋值给b.

Answer 5

有好几种方法,参考:
http://community.csdn.net/Expert/FAQ/FAQ_Index.asp?id=197352

Answer 6

什么东西呀!
搞那么复杂干什么!
VBScript都出来了!