主题：能否通过一个表内容来控制生成全局变量

以下内容为程序代码:

1 Dim cmd As new SQLCommand
2 cmd.C
3 Dim text,bh,nm As String
4 Dim t As Table=Tables("加载表")
5 Dim r As Row
6
7 For i As Integer=0 To t.Rows.count-1
8 If t.Rows(i)("表名")＜＞"" Then
9 If t.Rows(i)("编号")＜＞"" Then
10 nm=t.Rows(i)("表名")
11 bh=t.Rows(i)("编号")
12 Public t.Rows(i)("编号") As DataTable
13 text="Select * fr om {nm} where [_Identify] Is null"
14 cmd.CommandText=text
15 t.Rows(i)("编号") =cmd.ExecuteReader()
16
17 End If
18 End If
19 Next