如何判断子窗体中的字段是隐藏的

wx0000888

1  如何判断子窗体(数据表形式)中的某个字段是隐藏的?

2  如何知道某个字段在第几列?

请帮忙,谢谢!

风中漫步

看子窗体有无列属性?
有,列属性有无visible属性?
有,遍历列得到字段所在列

wx0000888

子窗体有无列属性?  没有找到.   另外无法证明某一字段(列标题)隐藏.


找到隐藏的办法了,谢谢!

todaynew

Sub GetCtrls(frm As Form)
        Dim ctrl As Control
        Dim i As Integer
        Dim m As Integer
        Dim str As String
        Set ctrls = frm.Controls
        m = 0: str = ""
        For Each ctrl In ctrls
           If ctrl.ControlType <> acLabel Then
                m = m + 1
                str = str & "第" & ctrl.TabIndex & "列字段名=" & ctrl.Name & " 是否隐藏=" & ctrl.ColumnHidden & Chr(13) & Chr(10)
           End If
        Next
        MsgBox str
End Sub

wx0000888

谢谢，子窗体数据表形式，字段是可以变换位置的，如何获取某列字段在第几列，本人是frm.selLeft-1,不知有没有更好的方法
来自: 微社区