根据当前列值，显示隐藏窗口按钮 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If e.Table.Current Is Nothing Then '如果Current为Nothing
    Return
End If
If forms("登记").Opened Then
    If e.Table.current("归档") = False
        Forms("登记").Controls("rwzAdd").Enabled = True
        Forms("登记").Controls("rwzDel").Enabled = True
        Forms("登记").Controls("tjAdd").Enabled = True
        Forms("登记").Controls("tjDel").Enabled = True
        Forms("登记").Controls("tjdpAdd").Enabled = True
        Forms("登记").Controls("tjdpDel").Enabled = True
        Forms("登记").Controls("cpdpAdd").Enabled = True
        Forms("登记").Controls("cpdpDel").Enabled = True '----------------------------以上部分测试通过
    Else
        Forms("登记").Controls("rwzAdd").Enabled = False ------------------从这行开始就会有错了
        'Forms("登记").Controls("rwzDel").Enabled = False
        'Forms("登记").Controls("tjAdd").Enabled = False
        'Forms("登记").Controls("tjDel").Enabled = False
        'Forms("登记").Controls("tjdpAdd").Enabled = False
        'Forms("登记").Controls("tjdpDel").Enabled = False
        'Forms("登记").Controls("cpdpAdd").Enabled = False
        'Forms("登记").Controls("cpdpDel").Enabled = False
    End If
End If

主题：根据当前列值，显示隐藏窗口按钮