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

去编写currentChanged事件。

If Tables("表A").current("归档") = False
    Forms("窗口1").Controls("Button1").Enabled = False
    Forms("窗口1").Controls("Button3").Enabled = False
End If

以下代码怎么会报错呢？奇怪了

--------------------------

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2014.11.11.1
错误所在事件：任务组,CurrentChanged
详细错误信息：
未将对象引用设置到对象的实例。

--------------------------

'如果任务组归档列打勾的话,部分按钮失效
If e.Table.Current Is Nothing Then '如果Current为Nothing
    Return
Else
    If Tables("任务组").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