Foxtable(狐表)用户栏目专家坐堂 → 关于通用子程序


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

主题:关于通用子程序

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


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
关于通用子程序  发帖心情 Post By:2021/1/19 22:42:00 [只看该作者]

备注字段(名为"代码"),内容是一段通用的代码.方便随时维护生效.
如何调用执行?
实现类似"调用代码(代码)"

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106167 积分:539952 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/19 23:43:00 [只看该作者]


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


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
  发帖心情 Post By:2021/1/20 15:56:00 [只看该作者]

内部函数不支持E参数.比如代码中的 Dim wm As String = e.Form.Name 是要获取当前窗口名称的.

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106167 积分:539952 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/20 16:01:00 [只看该作者]

把e参数传入函数,或者传入窗口名称

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


加好友 发短信
等级:二尾狐 帖子:577 积分:4596 威望:0 精华:0 注册:2013/3/3 1:52:00
  发帖心情 Post By:2021/1/21 21:16:00 [只看该作者]

图片点击可在新窗口打开查看 帮助中一时没找到,怎么传入啊?

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106167 积分:539952 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/21 21:57:00 [只看该作者]

比如:


内部函数abc

Dim name As Integer = args(0)

Msgbox(name)


窗口按钮

Functions.Execute("abc",e.form.name)

[此贴子已经被作者于2021/1/21 21:57:11编辑过]

 回到顶部