主题：父表与子表同步加载问题

有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()

谢谢了，放假还加班，辛苦了。