老师，模拟关联LoadChildren这个语法多列能否建立关联呢？

DataTables("订单").LoadChildren("订单明细", "订单编号", "订单编号")

比如

DataTables("S征地记录").LoadChildren("S征地明细", "协议书编号]+[第几期结算", "[协议书编号]+[第几期结算]")

CurrentChanged事件写筛选代码，如

If Forms("窗口1").Opened() \'一定要判断用于模拟关联表的窗口是否已经打开
    Dim t As Table = Tables("窗口1_Table1")
    With Tables("产品")
        If .Current Is Nothing Then
            t.Filter = "False"
        Else
            t.Filter = "产品编号 = " & .Current("产品编号")
        End IF
    End With
End If

老师变通了一下这样写报错？

.NET Framework 版本：2.0.50727.8762
Foxtable 版本：2018.3.9.1
错误所在事件：加载[进项票录入]失败!
详细错误信息：
\'FoxTempaX\' 附近有语法错误。

If Forms("进项票审核管理窗口").Opened()
    Dim t As Table =Tables("进项票录入")
    If e.Table.Current IsNot Nothing Then
        Dim filter As String = "发票号码= \'" & e.Table.Current("发票号码") & "\'"
        If t.DataTable.find(filter) Is Nothing Then
            t.DataTable.appendload(filter)
        End If
        t.filter =filter
    End If
End If

试试改成

If Forms("进项票审核管理窗口").Opened()
    Dim t As Table =Tables("进项票录入")
    If e.Table.Current IsNot Nothing Then
        Dim filter As String = "发票号码= \'" & e.Table.Current("发票号码") & "\'"
        If t.DataTable.find(filter) Is Nothing Then

t.DataTable.LoadFilter = ""

不然做个例子发上来测试。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:模拟关联.table

事例做的内部表，不报错，但子表也没加载。

afterLoad事件代码删除，或者写成

DataTables("进项票审核").LoadChildren("进项票录入","发票号码]+[合同编码]+[计量期数]+[税价合计金额","[发票号码]+[合同编码]+[计量期数]+[税价合计金额]")

老师，我外部表，子表数据默认不加载的，还是不行呢？

.NET Framework 版本：2.0.50727.8762
Foxtable 版本：2018.3.9.1
错误所在事件：加载[进项票录入]失败!
详细错误信息：
从数据类型 nvarchar 转换为 float 时出错。

那你就删除这句代码啊

DataTables("进项票审核").LoadChildren("进项票录入","发票号码]+[合同编码]+[计量期数]+[税价合计金额","[发票号码]+[合同编码]+[计量期数]+[税价合计金额]")