Foxtable(狐表)用户栏目专家坐堂 → [求助]动态函数的问题?


  共有2488人关注过本帖树形打印复制链接

主题:[求助]动态函数的问题?

帅哥哟,离线,有人找我吗?
ericsky
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:363 积分:3831 威望:0 精华:0 注册:2012/4/16 20:20:00
[求助]动态函数的问题?  发帖心情 Post By:2016/8/10 11:25:00 [只看该作者]

每个动态函数按照我的电脑性能越0.25-0.3秒,效率是在太低,
但是我发现,编译时间长短与代码量无关,所以我试了下,把所有的函数打包编译成一个大函数,也是0.25-0.3秒,函数调用也没问题
这就完美解决了编译效率的问题

想请教各位老师,这样做有没有后遗症,不胜感谢!

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/10 11:32:00 [只看该作者]

动态编译,主要是启动的时候耗时,可以整体编译的。

 回到顶部
帅哥哟,离线,有人找我吗?
kao_go
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:579 积分:4940 威望:0 精华:0 注册:2014/4/29 14:32:00
回复:(ericsky)[求助]动态函数的问题?  发帖心情 Post By:2017/7/18 15:01:00 [只看该作者]

请教,你是怎么把多个动态函数打包成一个大的函数的呢?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/18 15:19:00 [只看该作者]

以下是引用kao_go在2017/7/18 15:01:00的发言:
请教,你是怎么把多个动态函数打包成一个大的函数的呢?

 

需要编译的函数,一起编译不就好了?


 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4752 积分:34568 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2017/7/18 16:19:00 [只看该作者]

同问:如何一起编译?(大函数里包含多个小函数吗?)请明示

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/18 16:24:00 [只看该作者]

有什么问题?

 

Dim Code As String
Code = "Dim Val1 As Integer = 1" & vbcrlf
Code = Code & "Functions.Execute(""aaa"", val1)"
Functions.Add("test",Code)
Functions.Complie()

 

Code = "msgbox(args(0))"
Functions.Add("aaa",Code)
Functions.Complie()

 

Functions.Execute("test")


 回到顶部