如何将一个字符串转变为控件名字？如："ArrayName(0).Text ="

[blueprogrammer]

如题，谢谢！

[kwklover]

object.id=ArrayName(0).Text

[513]

你是不是要集中处理某类控件呀，如清空
static public void ClearControl(System.Web.UI.Page p)
{
for(int i=0;i<p.Controls.Count;i++)
{
if(p.Controls[i].HasControls())
{
for(int j=0;j<p.Controls[i].Controls.Count;j++)
{

if(p.Controls[i].Controls[j].GetType().Namespace=="System.Web.UI.WebControls")
{

if(p.Controls[i].Controls[j].GetType().Name=="TextBox")
{
((TextBox)(p.Controls[i].Controls[j])).Text="";
}
else if(p.Controls[i].Controls[j].GetType().Name=="DropDownList")
{
((DropDownList)(p.Controls[i].Controls[j])).ClearSelection();
}

}
}

}
}
}

[cnhgj]

Page.FindControl(Arrayname[0])

[blueprogrammer]

我想要达到的效果如下：
cmpt = "tbName|TextBox,lbProName|ListBox"
AryComponent = Split(cmpt,",")
for i = 0 to Ubound(AryComponent)
ArySmall = Split(AryComponent(i),"|")
If Lcase(ArySmall(1)) = "textbox" Then
ArySmall(0).Text = dtrder(i)'此处出错
ElseIf....Then
......
End IF
Next

各位帮忙呀！

[autoapple]

dtrder(i)是什么啊？

[blueprogrammer]

完整代码：
=====================
<script language=vb runat=server>
Sub ActiveReader(SQL,cmpt)
Dim cmd As SQLCommand
Dim dtrder As SQLDataReader
Dim strSQL As String
Dim i As Integer
Dim AryComponent(),ArySmall() As String

strSQl = SQL
AryComponent = Split(cmpt,",")

Call CreateConnection()
cmd = New SQLCommand(strSQL,dbConn)
dtrder = cmd.ExecuteReader
If dtrder.Read() Then
for i = 0 to Ubound(AryComponent)
ArySmall = Split(AryComponent(i),"|")
If Lcase(ArySmall(2)) = "textbox" Then
ArySmall(0).Text = dtrder(i)
End IF
Next
Else
End IF
Call EndConnection()
End Sub
</script>