Foxtable(狐表)用户栏目专家坐堂 → 请问,如何执行某行列中存放的代码?


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

主题:请问,如何执行某行列中存放的代码?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/16 15:43:00 [显示全部帖子]

 

http://www.foxtable.com/webhelp/scr/1487.htm

 

Functions.remove("函数")
Dim Code As String
Code = "msgbox(123)"
Functions.Add("函数",Code)
Functions.Complie()
Functions.Execute("函数")


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/16 16:12:00 [显示全部帖子]

以下是引用tennis在2018/3/16 16:11:00的发言:
3Q!! 请问一大串的代码如何?

 

多少代码都可以执行。但是动态编译需要时间,效率不高。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/16 17:14:00 [显示全部帖子]

看红色代码,把要执行的代码赋值进去

 

Functions.remove("函数")
Dim Code As String
Code = "msgbox(123)"
Functions.Add("函数",Code)
Functions.Complie()
Functions.Execute("函数")


 回到顶部