Dim cnt As Integer
For i As Integer = 0 To rys.Length - 1
For j As Integer = 0 To 6
Dim chk As WinForm.Combobox = e.Form.CreateControl("Combobox" & cnt, ControlTypeEnum.Combobox)
chk.Width = 80
chk.Text = rys(i)
chk.Left = 100 + j * 100
chk.Top = i * 25 + 80
e.Form.Controls("Panel1").AddControl(chk)
chk.ComboList = dr("bm_pbfl")
Next
cnt = cnt + 1
Next
这段代码是不是有错误，按这个循环 一行生成七个Combobox控件 控件的名称都是 Combobox" & cnt 因为cnt 要到下一行的时候才会增加1，那第一行自动生成七个 Combobox0 控件，第二行七个 Combobox1 控件？....
效果就是这样：
| Combobox0 | Combobox0 | Combobox0 | Combobox0 | Combobox0 | Combobox0 | Combobox0 |
| Combobox1 | Combobox1 | Combobox1 | Combobox1 | Combobox1 | Combobox1 | Combobox1 |
| Combobox2 | Combobox2 | Combobox2 | Combobox2 | Combobox2 | Combobox2 | Combobox2 |
| ... | | | | | | |
| | | | | | | |
如何解决这种控件重名的问题
[此贴子已经被作者于2019/6/22 0:06:36编辑过]
加好友 
发短信
Post By：2019/6/21 23:48:00 [只看该作者]
