Dim names1 As String = DataTables("报关单数据201516").GetComboListString("经营单位编号", "[申报日期] >= #1/1/2015# And [申报日期] < #1/1/2016#") Tables("报关单数据201516").filter = "[申报日期] >= #1/1/2016# And [申报日期] < #1/1/2017# and 经营单位编号 not in ('" & names1.Replace("|", "','") & "')"
加好友 
发短信
Post By：2017/1/9 17:31:00 [显示全部帖子]
