| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 代码中能否像EXCEL vba中那样 代码中调用别的代码 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=80464) |
| -- 作者：celchentao -- 发布时间：2016/1/23 16:31:00 -- 代码中能否像EXCEL vba中那样 代码中调用别的代码 各位大侠 代码中能否像EXCEL vba中那样 代码中调用别的代码？ |
| -- 作者：celchentao -- 发布时间：2016/1/23 16:34:00 -- 例如 如果输入的值为A 则执行 A1代码（A1代码包含诸多条件逻辑判断和诸多计算） 如果输入值为B 则执行B1代码（B1代码包含诸多条件逻辑判断和诸多计算） 如果输入值为C则................................. |
| -- 作者：Hyphen -- 发布时间：2016/1/23 16:44:00 -- 参考：http://www.foxtable.com/help/topics/1487.htm |
| -- 作者：celchentao -- 发布时间：2016/1/23 17:12:00 -- 这个好复杂 看不大明白 有没有简单点的 设置好代码 然后直接调用这段代码的 名称这样 |
| -- 作者：Hyphen -- 发布时间：2016/1/23 17:27:00 -- 已经很简单了,下面代码放到命令窗口执行看看 Dim Code As String = "msgbox(""Hello Foxtable!"")" \'定义代码块 Functions.Remove("Hello") \' 移除同名代码 Functions.Add("Hello",Code) \'添加代码块，命名为"Hello" Functions.Complie() \' 编译代码 \'编译后我们就可以在任意地方调用此代码块: Functions.Execute("Hello") |
| -- 作者：celchentao -- 发布时间：2016/1/23 17:29:00 -- 谢谢 我研究一下 |