Foxtable(狐表)用户栏目专家坐堂 → [求助]如何判断窗口表是否存在(已解决)


  共有1685人关注过本帖树形打印复制链接

主题:[求助]如何判断窗口表是否存在(已解决)

帅哥哟,离线,有人找我吗?
yyzlxc
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1530 积分:10633 威望:0 精华:0 注册:2008/9/24 11:16:00
[求助]如何判断窗口表是否存在(已解决)  发帖心情 Post By:2017/9/22 15:34:00 [只看该作者]

代码生成的“车间看板_Table2”窗口表

LockBaseMainForm
Tables("车间看板_Table2").StopRedraw
Dim b1 As New GroupTableBuilder("表1",DataTables("签到明细"))
b1.Groups.AddDef("姓名")
b1.Groups.AddDef("事由")
b1.Filter = "日期 = '" & rq & "' and 单位 = '" & dw & "' and 时段 = '" & _CGSD & "' and 状态 <> ''"
Tables("车间看板_Table2").DataSource = b1.BuildDataSource()
Tables("车间看板_Table2").AutoSizeCols()
With Tables("车间看板_Table2")'光标定位
    .Select(.Rows.Count - 1,.Cols.Count -1)
End With
Tables("车间看板_Table2").ResumeRedraw
UnLockBaseMainForm

问题:当关闭窗口后再打开窗口时,有时会弹出没有“车间看板_Table2”的出错提示。


图片点击可在新窗口打开查看此主题相关图片如下:捕获3.png
图片点击可在新窗口打开查看


设想当Tables("车间看板_Table2")不存在时,不运行相关代码。如何判断不存在车间看板_Table2,请工位老师指教,谢谢!!

[此贴子已经被作者于2017/9/22 16:54:09编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
yyzlxc
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1530 积分:10633 威望:0 精华:0 注册:2008/9/24 11:16:00
  发帖心情 Post By:2017/9/22 15:37:00 [只看该作者]

补充说明:这段代码是在计划管理中运行的,为了刷新数据。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/22 16:04:00 [只看该作者]

If Forms("车间看板").Opened Then

 

End If

 

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

 

If Tables.Contains("车间看板_Table2") Then

 

End If


 回到顶部
帅哥哟,离线,有人找我吗?
yyzlxc
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1530 积分:10633 威望:0 精华:0 注册:2008/9/24 11:16:00
  发帖心情 Post By:2017/9/22 16:54:00 [只看该作者]

谢谢有点甜老师的指教,问题解决,再次感谢!!

 回到顶部