主题：当某个表加载后，这个表的主窗口种没有窗口表控件，那么某个控件就不可用，这个代码怎么写

 判断窗口是否有窗口表？

Dim frm As WinForm.Form = Forms("窗口1")
Dim flag As Boolean = True
For Each c As object In frm.Controls
    If typeof c Is winform.Table Then
        flag = False
        Exit For
    End If
Next

某控件.Enabled = flag

改个简单的，这个代码怎么改
此主题相关图片如下：74.png

在主表切换事件中，当主表切换成主界面的时候   a  是否编辑

暂时知道了用.name属性，

Dim a As winform.button = Forms("顶部共有窗口").controls("锁定解锁表")

 If MainTable.name = "主界面" Then
   a.enabled = False
 Else
   a.enabled = True
 End If

这是全部这个事件的代码了，在打开项目的时候出错，问题会出在哪里呢

 这样也可以。

If MainTable.Equals(Tables("表A")) then
    msgbox("123")
End If

此主题相关图片如下：99.png

Dim a As winform.button = Forms("顶部共有窗口").controls("锁定解锁表")
If MainTable.Equals(Tables("主界面")) Then
   a.enabled = False
 Else
   a.enabled = True
End If

 方法一

Dim a As winform.button = Forms("顶部共有窗口").controls("锁定解锁表")
If MainTable.Name = "主界面"  Then
   a.enabled = False
 Else
   a.enabled = True
End If

 方法二

Dim a As winform.button = Forms("顶部共有窗口").controls("锁定解锁表")
If Tables.Contains("主界面") AndAlso MainTable.Equals(Tables("主界面")) Then
   a.enabled = False
 Else
   a.enabled = True
End If