* "Gigaworld said:
I have this PROBLEM with controls collection:
The old VB 6.0 syntax was:
MyStr = me.controls("button1").text
VB .NET doesn't function in this way, because in .NET
I must know the index of the control! I need to use the
STRING NAME of the control to address the object, because
my target is doing something like this:
for i = 1 to 10
MyStr(i) = me.controls("button" & i ).text
next i
if I use this:
MyStr = me.controls(IndexOf(button1)).text
I have again the same problem: cannot use the STRING NAME
of the object!
Please don't multipost!
My FAQ:
\\\
Private Function FindControl( _
ByVal ControlName As String, _
ByVal CurrentControl As Control _
) As Control
Dim ctr As Control
For Each ctr In CurrentControl.Controls
If ctr.Name = ControlName Then
Return ctr
Else
ctr = FindControl(ControlName, ctr)
If Not ctr Is Nothing Then
Return ctr
End If
End If
Next ctr
End Function
///
Usage:
\\\
DirectCast(FindControl("btnBla", Me), Button).Enabled = False
///
Notice that the procedure listed above is "slow", if you have to access a
lot of controls by name very often, you should store references to them in a
'Hashtable' object. You can use the name of the control as key:
\\\
Private m_Controls As New Hashtable()
///
Adding a control:
\\\
Dim DynamicPictureBox As New PictureBox()
DynamicPictureBox.Name = "PictureBox1"
m_Controls.Add(DynamicPictureBox.Name, DynamicPictureBox)
///
Looking for a control:
\\\
Dim p As PictureBox = DirectCast(m_Controls.Item("PictureBox1"), PictureBox)
///
Removing a control:
\\\
m_Controls.Remove("PictureBox1")
///
Sometimes it's even better to add the control to an array. This will allow
fast and easy index-based access to the control references:
\\\
Dim MyLabels() As Label = {Label1, Label2, ..., Label10}
///
Access by 'MyLabels(0)' to 'MyLabels(9)'.
Control arrays:
Control arrays, as known from VB6, are not included in VB.NET 2002/2003.
Creating Control Arrays in Visual Basic .NET and Visual C# .NET:
<URL:
http://msdn.microsoft.com/library/e...ngControlArraysInVisualBasicNETVisualCNET.asp>
WinForms Controls--Creating Control Arrays in VB.NET
<URL:
http://www.devx.com/vb2themax/Article/19907/>
In VS.NET "Whidbey" (2005) control arrays will be supported natively.
