以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自动增加按钮代码问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=119439)
--  作者：Liangcai
--  发布时间：2018/5/24 21:05:00
--  自动增加按钮代码问题
Dim Bu As WinForm.Button
Bu = Forms(“窗口1”).CreateControl("Button1", ControlTypeEnum.Button)
Bu.SetBounds(500,4,28,23)
Forms(“窗口1”).AddControl(Bu)
Bu.text = "关闭"
Forms(“窗口1”).Controls(“关闭”)的Click代码想写在这
Bu.Click(e.Form.Close())？
请老师指教，谢谢！
--  作者：有点甜
--  发布时间：2018/5/24 22:09:00
--  

无法通过代码添加事件代码的。

 

按钮代码，请写到【窗口全局事件】去。

 

 
--  作者：Liangcai
--  发布时间：2018/5/26 12:34:00
--  
谢谢！