'類模組class1**：
option explicit
private withevents mvarcmbtn as ***mandbutton
public property set cmbtn(byval vdata as ***mandbutton)
set mvarcmbtn = vdata
end property
public property get cmbtn() as ***mandbutton
set cmbtn = mvarcmbtn
end property
private sub mvarcmbtn_click()
msgbox mvarcmbtn.name
end sub
'測試窗體**：
option explicit
dim a() as class1
private sub ***mand1_click()
me.controls.remove me.controls("cmdobj3") '刪除控制項
end sub
private sub form_load()
redim a(5)
dim i as integer
for i = 0 to 5
set a(i) = new class1
set a(i).cmbtn = me.controls.add("vb.***mandbutton", "cmdobj" & i)
a(i).cmbtn.visible = true
a(i).cmbtn.top = i * 500
next i
end sub
給動態建立的控制項指定事件
1.先宣告dialogfield變數，記住需要指定事件的控制項使用formstringcontrol 2.在dialog事件中建立相關控制項，注意dialogfield與formstringcontrol的不同之處。formstringcontrol需要指定name 3.在dialogpostrun...
C 中動態建立控制項及事件處理程式
using system using system.drawing using system.collections using system.componentmodel using system.windows.forms using system.data namespace miner cl...
IOS動態建立控制項通過tag處理單擊事件
1.在開發中,我們很多時候需要動態建立控制項.在建立控制項的時候給控制項設定乙個tag值,利用這個tag值來操作控制項.2.建立控制項一般要設定控制項的大小和位置,這兩個屬性是最重要的.最後利用addsubview 方法將控制項新增到指定的容器即可.3.通過tag獲取控制項然後操作控制項的屬性等,我...