大家帮看，我的两个函数，哪个更好些呀，一个是前期绑定，一个是后期绑定？

[tdcq123]

大家帮看，我的两个函数，哪个更好些呀，一个是前期绑定，一个是后期绑定？
---------------------------------
两个函数的功能都是接收一个字符串，然后返回这个字符串的值。当然了，这个字符串是一个计算公式。
一个用前期绑定，一个是后期绑定，
我的这两个函数写在模块中，供窗体中代码调用，具有通用性，就是不知哪种更好，效率更好些，更合理些。

'该函数使用的是前期绑定
Function result(ByVal X1 As String) As Double
    On Error GoTo err
    Dim obj As New MSScriptControl.ScriptControl
    obj.Language = "vbscript"
    result = Round(obj.Eval(X1), 2)
    Set obj = Nothing
    Exit Function
err:
    MsgBox err.Description
End Function

'该函数使用的是后期绑定
Function result2(ByVal X1 As String) As Double
    On Error GoTo err
    Dim obj As Object
    Set obj = CreateObject("MSScriptControl.ScriptControl")
    obj.Language = "vbscript"
    result2 = Round(obj.Eval(X1), 2)
    Set obj = Nothing
    Exit Function
err:
    MsgBox err.Description
End Function

[tdcq123]

没有关注，自已顶一下。
发现最近论坛速度太慢了。

[嗷嗷叫的老马]

刚过完年,是这样的.

前期绑定特点是性能好,没有太大开销;

后期绑定的话,VB要先查询对象的接口,看看是否支持....貌似还有不少工作要做...最终才能完成实例化对象.

总的开销比前期绑定大,但是灵活~~~

看你自己的应用中对这种开销是否能忍受吧....

[程晨c]

一般使用前期绑定