以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自定义事件及动态添加控件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=38797)
--  作者：guoweidong
--  发布时间：2013/8/7 13:05:00
--  自定义事件及动态添加控件

Dim  ts As new Windows.Forms.ToolStrip
Dim  tsi As new Windows.Forms.ToolStripDropDownButton("页面集合")
Dim tsi1 As new Windows.Forms.ToolStripButton("页面1")
Dim tsi2 As new Windows.Forms.ToolStripButton("页面2")
Dim  tsi3 As new Windows.Forms.ToolStripButton("页面3")
AddHandler tsi1.Click, AddressOf Button_Click
AddHandler tsi2 .Click, AddressOf Button_Click
AddHandler tsi3 .Click, AddressOf Button_Click
tsi.DropDownItems.Add(tsi1)
tsi.DropDownItems.Add(tsi2)
tsi.DropDownItems.Add(tsi3)
ts.Items.Add(tsi)
e.Form.baseform.Controls.Add(ts)

 

 

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=37935 

 

代码是这段连接的，我想问了下，怎么看Button_Click 按钮事件里的代码，怎么去做更多的操作。
--  作者：不倒的翁
--  发布时间：2013/8/7 13:38:00
--  
AddHandler tsi1.Click, AddressOf Button_Click
是事件过程定义，代码都在全局代码中。
--  作者：guoweidong
--  发布时间：2013/8/7 16:59:00
--  
明白了，原来是这样定义事件的。