读书人

怎么自动为控件取名

发布时间: 2012-01-09 21:05:42 作者: rapoo

如何自动为控件取名?
我想根据某变量值动态的创建一些控件,比如listview

思路:定义一个变量i,根据i值来动态的创建listview并自动为其命名

比如:dim i as intger
i=3

这时想定义3个listview控件并为其命名

i=4

......依次类推

该如何实现呢?这些动态生成的控件以后又怎么使用呢?比如想往某个listview里加东西,怎么写呢?


[解决办法]
您可以用控件数组来做。
[解决办法]
Public Class Form1

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

Dim t As Integer = 3
Dim left As Integer = 12
Dim top As Integer = 12

Dim lb(t) As ListBox
For i As Integer = 0 To t - 1
lb(i) = New ListBox
With lb(i)
.Left = left
.Top = top + 100 * i
End With
Me.Controls.Add(lb(i))
Next

lb(0).Items.Add( "Item1 ")
lb(1).Items.Add( "Item1 in lb(1) ")
lb(2).Items.Add( "Another item ")
End Sub

End Class

读书人网 >VB Dotnet

热点推荐