<script type="text/javascript">
</script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
如何自动为控件取名?
我想根据某变量值动态的创建一些控件,比如listview
思路:定义一个变量i,根据i值来动态的创建listview并自动为其命名
比如:dim i as intger
i=3
这时想定义3个listview控件并为其命名
i=4
......依次类推
该如何实现呢?这些动态生成的控件以后又怎么使用呢?比如想往某个listview里加东西,怎么写呢?
__________________________________________________________________________
定义变量的名称,然后Find控件。
__________________________________________________________________________
您可以用控件数组来做。
__________________________________________________________________________
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
__________________________________________________________________________
命名不难,做个局部变量保存目前的i就行了。
以后能用的话,就要用List来保存了,如果希望使用事件,那么add控件之后,还要加上addhandler的。
__________________________________________________________________________
如何自动为控件取名?
我想根据某变量值动态的创建一些控件,比如listview
思路:定义一个变量i,根据i值来动态的创建listview并自动为其命名
比如:dim i as intger
i=3
这时想定义3个listview控件并为其命名
i=4
......依次类推
该如何实现呢?这些动态生成的控件以后又怎么使用呢?比如想往某个listview里加东西,怎么写呢?
__________________________________________________________________________
定义变量的名称,然后Find控件。
__________________________________________________________________________
您可以用控件数组来做。
__________________________________________________________________________
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
__________________________________________________________________________
命名不难,做个局部变量保存目前的i就行了。
以后能用的话,就要用List来保存了,如果希望使用事件,那么add控件之后,还要加上addhandler的。
__________________________________________________________________________