以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请问这个命令如何改 (http://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\'" |