主题：动态创建表时怎么同时加列标题？

1、帮助文件创建表及列，但是同时每一列加个列标题，怎么办？

Dim Builder As New ADOXBuilder
Dim tbl As ADOXTable
Builder.Open()
tbl = Builder.NewTable("订单") '创建表
With tbl
    .AddColumn("日期" ,ADOXType.DateTime)
    .AddColumn("产品" ,ADOXType.String, 12)
    .AddColumn("客户" ,ADOXType.String, 20)
    .AddColumn("数量" ,ADOXType.Integer)
    .AddColumn("备注" ,ADOXType.Text)
End With
Builder.AddTable(tbl) '增加表
Builder.Close()
Syscmd.Project.Open(ProjectFile)

2、还有个小问题，我用单元格绘图的时候e.row.height就可以获取行高的值 ，但是我想在命令窗口来取当前行的行高，但是row没有发现有行高属性，请问在命令窗口怎么获取当前行的行高

3、咱们论坛我想看管理的回复，总是每次点“平板”才能展开帖子，请问从哪里设置可以自动展开，不用每次都点

4、我发现一些精华贴挺棒,想有时间多学习一下，怎么看？有没有统一的筛选功能

1、foxtable没有提供方法设置列标题。如果你要设置，也只能临时性修改

http://www.foxtable.com/webhelp/scr/1275.htm

2、msgbox(Tables("表A").grid.rows(Tables("表A").grid.rowsel).heightdisplay)

3、没办法，搜索到的帖子，必须点【平板】

4、论坛没有针对精华帖的筛选功能。你直接一个一个的看呗 http://www.foxtable.com/bbs/index.asp?boardid=2&TopicMode=0&List_Type=6,0,0&page=