主题：列标题能否做成下拉框选择

参考

Tables("表A").grid.AllowFiltering = true

1、你这样做的目的是什么？

2、为什么一定要在列标题下拉，隐藏列标题，在表格里面下拉更好控制。

参考

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=109607&skin=0

可以，做起来比较麻烦。参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=100787&skin=0

你可以把列名隐藏，把第一行当成列名不就好了？

参考

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

prepareEdit事件

If e.Row.Index = 0 Then
    Dim nm As String = ""
    For Each dc As Col In Tables("表A").Cols
        nm = nm & "|" & dc.Name
    Next
    e.Col.ComboList = nm
Else
    e.Col.ComboList = Nothing
End If

循环每一列，把标题和列名对应起来。再有就是，你datacol的标题有可能是空值，要注意，必须用table

Dim dt As Table = Tables("表a")
Dim dic As new Dictionary(of String, Col)
For Each dc As Col In dt.Cols
    If dic.ContainsKey(dc.Caption) = False Then
        dic.Add(dc.Caption, dc)
    End If
Next
msgbox(dic("第一列").name)

截图说明你的【行类别】的意思。你要做到什么效果？

没看懂你的逻辑。你的逻辑是什么？根据什么规则确定行类别？

你可以判断序号列有没有值，值是不是数字。