大师:请问一、表的筛选语句最大长度限制是多少?第二种筛选语句,超过一定长度,就出错,退出!
二、如果换成第一种语句,新版本的第一个筛选语句比老版本执行的时间长多了,筛选时间比加载数据还长,劳驾解释一下!
三、jh.count 才2350个左右,表的中行数35000行左右,这才是一般企业的凭证数据,上市公司一般都有几十万,分月加载正常也要几万,分项目或科目加载也很多。
Dim jh As new List(of String)jh = pztb.GetValues("pzzb142")
筛选语句1:
Dim Parts() As String
Parts = jh.ToArray
Dim Str1 As String
Str1 = "'" & String.Join("','", Parts) & "'"
Dim filter As String = " pzzb142 in (" & Str1 & ")"
MessageBox.Show(2)
筛选语句2:
'Dim filter As String
'For Each a As String In jh '------筛选字符串后转条件表达式
'If filter = "" Then
'filter = " pzzb142 = '" & a & "'"
'Else
'filter = filter & " or pzzb142 = '" & a & "'"
'End If
'
'Next
Dim tb5 As WinForm.Table = Forms("frmBbFxMain").Controls("Table22")
tb5.Table.StopRedraw
tb5.Table.Filter = filter
tb5.Table.ResumeRedraw