主题：帮忙看看代码那里不对

ElseIf e.DataTableName = "支出明细" Then
    Dim ids As String
    For Each dr As DataRow In DataTables("业务大表").DataRows
        ids = ids & "," & dr("关单号")
    Next
    ids= ids.Trim(",")
    e.SelectString = "Select * From {支出明细} Where [关单号] In (" & ids & ") Or [支出账户] Is Null"
End If

 

此主题相关图片如下：2012-02-05_13-08-13.jpg