怎样通过名字访问对象

[enmity]

譬如有以下DataGrid：DG1、DG2、DG3.....DG10，想这样：
Dim dgs(9) as DataGrid
Dim i As Integer

For i=1 to 10
dgs(i-1)=xxxx("DG" & i.ToString)
Next

xxxx代表转换，这个转换怎样实现？？？

[amortal]

dim ctl as control
dim obj as datagrid
for each ctl in me.controls
if ctl.name="view" then
obj = ctype(ctl,datagrid)
end if
next

[smoothwood]

窗口上有名为Textbox1~TextBox4的四个输入框，代码如下
——————————————————————————
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim txt(3) As TextBox
Dim obj As Object
For Each obj In Me.Controls
If TypeOf (obj) Is TextBox Then
Dim id As Integer = CType(obj, TextBox).Name.Substring(obj.name.ToString.Length - 1, 1)
txt(id - 1) = obj
End If
Next
For i As Integer = 0 To txt.Length - 1
Console.WriteLine(txt(i).Text)
Next
End Sub

[minajo21]

建立一个 DataGrid 的数组

http://www.csdn.net/Develop/Read_Article.asp?Id=20241

[Ninputer]

DataGrid的Name属性可以用，你从所有的DataGrid中搜索你要的Name吧