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

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


'该函数使用的是前期绑定
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
...全文
51 点赞 收藏 3
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
程晨c 2008-02-22
一般使用前期绑定
回复
刚过完年,是这样的.

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

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

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

看你自己的应用中对这种开销是否能忍受吧....
回复
tdcq123 2008-02-20
没有关注,自已顶一下。
发现最近论坛速度太慢了。
回复
相关推荐
发帖
VB基础类
创建于2007-09-28

7491

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2008-02-20 04:47
社区公告
暂无公告