如果关联列是字符型:
Select Case e.DataCol.Name
Case "单号"
e.DataRow("所有配料") = DataTables("子表").GetComboListString("取值列","子表关联列 = '" & e.DataRow("父表关联列") & "'")
End Select
如果关联列是数值型:
Select Case e.DataCol.Name
Case "单号"
e.DataRow("所有配料") = DataTables("子表").GetComboListString("取值列","子表关联列 = " & e.DataRow("父表关联列") )
End Select