主题：请教，有关窗口Table中visible无效的问题

Table2是窗口“快递查询”中Normal类型的表名

Dim pds As New System.Data.DataSet
pds = CXmlToDataSet(ss)
Tables("快递查询_Table1").DataSource = pds.Tables(0)
If Tables("快递查询_Table1").Rows(0)("Status") = 1 Then
   Tables("快递查询_Table2").DataSource = pds.Tables(1)
   Tables("快递查询_Table2").visible = True
   Tables("快递查询_Table2").cols(2).visible = False
   Tables("快递查询_Table2").AutoSizeCol(Tables("快递查询_Table2").cols(0).name)
   Tables("快递查询_Table2").AutoSizeCol(Tables("快递查询_Table2").cols(1).name)
Else
   Tables("快递查询_Table2").visible = False
   e.Form.controls("textbox2").value = "没有查询结果!请检查订单号及快递名称是否正确?"
End If

请教，颜色标记的代码无效，查不出原因。请指点！谢谢！！

  表名没有错呀。Tables("快递查询_Table2").visible = False
  设置为什么无效呢？

  试把Tables("快递查询_Table2").visible = False  改成 messagebox.show(Tables("快递查询_Table2").count)显示是正确的。是否新版对DataSource显示设置有问题呀