VB动态控件如何触发事件

时间：2017.09.14 发布人：yoyococoyoyoco
VB动态控件如何触发事件

已解决问题

谷歌yoyococoyoyoco用户在2017.09.14提交了关于“沙溪古镇VB动态控件如何触发事件”的提问，欢迎大家涌跃发表自己的观点。目前共有1个回答，最后更新于2025-02-27T03:28:16。希望大家能够帮助她。

详细问题描述及疑问：期待您的答案，你就是当代的活雷锋,太感谢了 ！

希望以下的回答，能够帮助你。

第1个回答

用户名：tymign12  

VB中可以用下面的方法动态添加风材打核帮斗资不Combo控件

1、在窗体中来自先手工添加一个C千写屋宪保谁情会布合世ombo1控件，设置其Index=0

2、利用程序动态添加需要的Combo1控件

如：

DimxAsInteger
D问答imyAsInteger
D宜imiAsInteger

x=Combo1(0).思义愿皱Left
y叫举座雷系李民针析=Combo1(0仍争念势).Top

Fo缺美了核非车ri=1To3
LoadCombo1(i)'添加Combo1控件，并排将别注哥孔凯引杆自敌岁列整齐
Combo1(i).Left=x
Combo1(i).Top=y+Combo1(0).h**eight*i+2
Combo1(i).Visible输课尽=True

Combo1(i).AddItem"组合选择框("+Str(i+1)+")"
Combo1(i).Text=""
Nexti

效果如下图：

3、这样的话，Combo1控件的Click()事件控制中就更新为：

PrivateSubCombo1_Click(IndexAsInteger)
SelectCaseIndex
Case0
M贵调致言低设sgBoxCombo1(I兵物列杀华液京ndex).Text
Case1

Case2
EndSelect
E特ndSub
事件中，不同的Combo1()对应的Index是不同的，利用Index区分是哪个永每方的绍济过Combo1()事件