如果关联列是字符型:
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