有A,B表,通过作业单号关联,列类型为:字符型,但是同步加载时出现如下错误代码,但是将作业单号列改为:整数型又可以正常加载,请问如何改进代码?
此主题相关图片如下:213.jpg
代码如下:
If DataTables("A").DataRows.Count = 0 Then '如果订单表没有数据
DataTables("B").LoadFilter = "作业单号 Is Null" '不加载订单明细
Else
Dim ids As String
For Each dr As DataRow In DataTables("A").DataRows
ids = ids & "," & dr("作业单号")
Next
ids= ids.Trim(",")
DataTables("B").LoadFilter = "作业单号 In (" & ids & ")"
End If
DataTables("B").Load()