以下是引用晕了快扶我在2013-8-4 19:37:00的发言:
应该不是这个问题,loadfilter本身就是从后台加载,而且我是测试的数据库,才40几条主表数据,子表也不超过100条,最重要的是我本身的代码没问题,改造成内部函数后调用的时候就出问题了,一会我做个例子上来吧
如果不是数量大的问题,就是条件写错了。试试改改,in之前加个空格
Dim ids As String
For Each dr As DataRow In DataTables(tbn).DataRows
ids = ids & ",'" & dr(keys) & "'"
Next
ids= ids.Trim(",")
DataTables(tbn1).LoadFilter = keys & " In (" & ids & ")"
Dim vds As String
For Each dr As DataRow In DataTables(tbn1).DataRows
vds = vds & ",'" & dr(keys) & "'"
Next
vds= vds.Trim(",")
DataTables(tbn).LoadFilter = keys & " In (" & vds & ")"
[此贴子已经被作者于2013-8-4 19:50:36编辑过]