求助tab页面里动态创建表格，为何不能设置表格属性

[sshen2008]

各位大佬，小弟又遇到个问题，vb.net2008如何动态创建表格，只有第一个表格的属性可以设置，后续几个都不能设置。不知道哪里有些问题。
请看测试结果和代码
好心人帮解下，贴上代码。不胜感激

Dim FlexGrid_PingGuTiShi As New List(Of AxMSHierarchicalFlexGridLib.AxMSHFlexGrid) '创建一个表格的泛型列表集合
'* 添加数据库"System"表中系统类型到sstab.caption *****************************
Dim SystemArray As Object
Dim nIndex As Short

SystemArray = cls_AFile.GetAccessTable_Col_AllField("System", "SystemName")
nIndex = UBound(SystemArray) + 1

For i = 0 To UBound(SystemArray)
'*插入Tab页面
Dim Tab As New TabPage
SSTab_JiBingXiTong.TabPages.Add(Tab)
Tab.Text = SystemArray(i)

'*添加各sstab中的FlexGrid_PingGuTiShi表格
Dim FG As New AxMSHierarchicalFlexGridLib.AxMSHFlexGrid '实例化一个新表格
FG.Name = "FlexGrid " & i
FG.Text = FG.Name
FG.Location = New Point(6, 18)
FG.Width = 792
FG.Height = 294
FG.Tag = i
AddHandler FG.ClickEvent, AddressOf FlexGrid_PingGuTiShi_ClickEvent '委托按钮的单击事件
Tab.Controls.Add(FG) '在窗体上添加按钮
'*设置属性
FG.Rows = 5 '设置行数
FG.set_Cols(4) '设置列数
FlexGrid_PingGuTiShi.Add(FG) '将按钮添加到按钮集合中
Next
SSTab_JiBingXiTong.SelectedIndex = 0