[求助]如何用代码在窗体中动态增加按钮控件，并动态设置按钮代码？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何用代码在窗体中动态增加按钮控件，并动态设置按钮代码？

下一主题 >> << 上一主题

共有2158人关注过本帖树形打印复制链接主题：[求助]如何用代码在窗体中动态增加按钮控件，并动态设置按钮代码？

帅哥哟，离线，有人找我吗？

yangguojun

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：102 积分：818 威望：0 精华：0 注册：2013/8/11 9:54:00

[求助]如何用代码在窗体中动态增加按钮控件，并动态设置按钮代码？ 发帖心情

发帖心情

Post By：2016/8/31 10:58:00 [只看该作者]

[求助]如何用代码在窗体中动态增加按钮控件，并动态设置按钮代码？

回到顶部

帅哥，在线噢！

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109447 积分：556891 威望：0 精华：9 注册：2015/6/24 9:21:00

发帖心情

Post By：2016/8/31 11:08:00 [只看该作者]

参考：http://www.foxtable.com/webhelp/scr/1409.htm

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

回到顶部

帅哥哟，离线，有人找我吗？

yangguojun

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：102 积分：818 威望：0 精华：0 注册：2013/8/11 9:54:00

发帖心情

Post By：2016/8/31 11:15:00 [只看该作者]

之前没看懂，重新看了一边，有点启发，多谢

回到顶部

帅哥哟，离线，有人找我吗？

yangguojun

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：幼狐帖子：102 积分：818 威望：0 精华：0 注册：2013/8/11 9:54:00

发帖心情

Post By：2016/8/31 13:55:00 [只看该作者]

MessageBox.show("你无审核权限!")

上面的代码存储在表的 ‘控件代码 ’ 字段里面

如何在下面的全局代码中执行上面的代码

如果采用全局代码，只需在全局事件Click中加入以下代码即可：

Select Case e.Sender.Name
Case "btnPrev"
’执行 MessageBox.show("你无审核权限!") 这段代码
End Select

回到顶部

帅哥，在线噢！

有点蓝

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109447 积分：556891 威望：0 精华：9 注册：2015/6/24 9:21:00

发帖心情

Post By：2016/8/31 14:42:00 [只看该作者]

参考：http://www.foxtable.com/webhelp/scr/1487.htm

回到顶部

帅哥，在线噢！

有点蓝

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109447 积分：556891 威望：0 精华：9 注册：2015/6/24 9:21:00

发帖心情

Post By：2016/8/31 14:44:00 [只看该作者]

Functions.Remove("msg")

Dim Code As String

Code = "MessageBox.show(""你无审核权限!"")"

Functions.Add("msg",Code)

Functions.Complie()

Functions.Execute("msg")

回到顶部

下一主题 >> << 上一主题

RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 4 次数据查询