模拟关联表，子表为空时提示错误 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

模拟关联表

If Forms("基础档案模板").Opened() '一定要判断用于模拟关联表的窗口是否已经打开

Dim t As Table = Tables("基础档案模板_you22")

With Tables("yonghu")

If .Current Is Nothing Then

t.Filter = "False"

Else

If .Current.Isnull("yhdm") Then '如果用户代码为空,则不筛选

t.Filter = "False"

Else

t.Filter = "yhdm = " & .Current("yhdm")

End If

End With

End If

如果表you22中不存在相应的yhdm时会提示【无法在 System.String 和 System.Int32 上执行“=”操作。】

主题：模拟关联表，子表为空时提示错误