主题：甘特图改进问题？

甘特图改进问题？我在原来帮助的甘特图例子上列名采用表头式后出现不对你，请问在哪里设置可设右侧甘特图与左侧对称？
此主题相关图片如下：0011.jpg

 设置一下表头的高度

 

Tables("表名").SetHeaderRowHeight(20,25)

 

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

 

写在哪里啊？表属性什么位置的？

 窗口打开事件 afterLoad，表名要写对，高度要设置正确。

这个只可设定左侧的，右侧的甘特图标题高度在哪里设呢？

 

改成对应的表名，就能设置了啊。

 

e.Forms.Controls("Table1").Table.SetHeaderRowHeight(20,25)

太高难度了
此主题相关图片如下：0033.jpg

 写错了

 

e.Form.Controls("任务").Table.SetHeaderRowHeight(20,25)

试试   写在表格的 AfterResizeRow 事件里

 

 

表格1

 

Dim tb1 As Table = e.Form.Controls("Table1").Table
Dim tb2 As Table = e.Form.Controls("Table2").Table

If e.Position < 0 Then
    tb2.Grid.Rows(0).Height = tb1.Grid.Rows(0)

    tb2.Grid.Rows(1).Height = tb1.Grid.Rows(1)

Else
    tb2.DefaultRowHeight = tb1.DefaultRowHeight

 

End If

 

 

表格2

Dim tb1 As Table = e.Form.Controls("Table1").Table
Dim tb2 As Table = e.Form.Controls("Table2").Table

If e.Position < 0 Then
     tb1.Grid.Rows(0).Height = tb2.Grid.Rows(0).Height

     tb1.Grid.Rows(1).Height =  tb2.Grid.Rows(1).Height
Else
    tb1.DefaultRowHeight = tb2.DefaultRowHeight

End If