- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 窗口模拟关联，主表无数据时运行错误 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=189595)
-- 发布时间：2023/12/11 9:46:00
-- 窗口模拟关联，主表无数据时运行错误
各位老师：
请教一下我这个问题如何解决？
我在窗口中加入了两个表，用的是模拟关联，方法如下，现在的问题是在打开窗口时Table1中有数据时没有问题，但是一但打开窗口时Table1中无数据时就行出行如下图所示运行错误，请问有什么方法可以在Table1无数据时不会跳出错误提示？
AfterLoad
Dim t1 As Table = e.Form.controls("table1").Table
Dim t2 As Table = e.Form.controls("table2").Table
t2.Filter = "模具编号 = \'" & t1.Current("模具编号") & "\'"
在Table1的CurrentChanged件事中
Dim t1 As Table = e.Form.controls("table1").Table
Dim t2 As Table = e.Form.controls("table2").Table
t2.Filter = "模具编号 = \'" & t1.Current("模具编号") & "\'"
[此贴子已经被作者于2023/12/11 9:47:24编辑过]
-- 发布时间：2023/12/11 10:36:00
--
参考：http://www.foxtable.com/webhelp/topics/0445.htm
If t1.Current IsNot Nothing Then
t2.Filter = "模具编号 = \'" & t1.Current("模具编号") & "\'"
End If
t2.Filter = "模具编号 = \'" & t1.Current("模具编号") & "\'"
End If
-- 发布时间：2023/12/11 10:43:00
--
感谢！