以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  请问这个命令如何改  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=160613)

--  作者:13796361423
--  发布时间:2021/2/8 15:39:00
--  请问这个命令如何改
Tables("学籍办理明细表2020年").Filter = "序号=2020001-2020457 and [序号] is not null" 
Tables("学籍办理明细表2020年").Sort = "序号" 
Dim t As Table = Tables("学籍办理明细表2020年")
t.Select(0,0,t.rows.count-1,t.cols.count-1)
Dim Book As New XLS.Book(ProjectPath &  "Attachments\\导出学籍明细表.xls")
 Dim fl As String =  ProjectPath &  "Reports\\导出学籍明细表.xls"
 Book.Build() \'生成细节区
Book.Save(fl) \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = fl
 Proc.Start()



Filter = "序号=2020001-2020457 and [序号] is not null"      想要这个字符型的序号在 2020001到20200457之间, 就是想要选取前面四个字符是2020的, 这个命令如何改?

--  作者:有点蓝
--  发布时间:2021/2/8 15:41:00
--  
Tables("学籍办理明细表2020年").Filter = "序号>=\'2020001\' and 序号<=\'2020457\'"