主题：表打开问题

第一个点击对应的按钮会直接打开指定的表格
此主题相关图片如下：360桌面截图20120306153101.jpg

 

 

 

第二个点击对应的按钮会直接打开指定的表格  会指向指定的表格  只会出现标题   但是不会展开数据表格

此主题相关图片如下：360桌面截图20120306153032.jpg

 

 

求解

http://www.foxtable.com/help/topics/0436.htm

 

在哪设计

 

菜单MainTableChanged事件吗

你不是说单击某个按钮切换到某个表吗，那就设置这个按钮的Click事件代码:

 

Maintable  = Tables("表名")

 

 

我的代码是

 

For Each t As Table In Tables 

If t.name = "订单"

t.visible = True

Else

t.visible = False 

End If

Next

 

都是一样的写入，但是结果不一样如上图显示

用4楼的方法。

 

我需要打开当前表、关闭其他的表

在项目属性中，将“显示标题”属性设置为False

或者看看：

http://www.foxtable.com/help/topics/2306.htm

 

上述我都检查过了、上楼说的是隐藏标题、而我的问题刚好反过来、点击Maintable = Tables("订单")  时只会显示订单标题  不会显示数据、需要单击标题才会展开数据、

1楼的图片就是

第一张通过Maintable = Tables("订单") 按钮打开i 直接打开了标题和数据表内容 

第二张通过Maintable = Tables("订单") 按钮打开i  直接打开的是标题、需要单击标题才会展开数据内容。

这个时候，没有必要在上面显示一个表头，因为通常左边有个导航，显示当前表的名称。

一定要的话：

 

Dim nm As String = "表B"
Tables(nm).Visible = True
For Each t As Table In Tables
   t.Visible = (t.Name = nm)
Next
MainTable = Tables(nm)