以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 哪里来的 ' (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97384) |
-- 作者:刘林 -- 发布时间:2017/3/10 21:56:00 -- 哪里来的 ' Dim dlg As New FolderBrowserDialog If dlg.ShowDialog = DialogResult.Ok Then For Each c As String In DataTables("学生信息").GetValues("班级") Dim ex As new Exporter ex.SourceTableName = "学生信息" \'指定导出表 ex.FilePath = dlg.SelectedPath & c & ".xls" \'指定目标文件路径 ex.Format = "excel" \'导出格式为符号分割的文本文件 \'\' ex.NewTableName = c & ".xls" \'\'指定文件名,注意无须扩展名 ex.Fields ="班级,学生姓名,身份证件号" ex.filter = "班级 = \'" & c & "\'" If filesys.fileexists(ex.filepath) Then filesys.deletefile(ex.filepath) End If ex.Export() \'开始导出 Next End If 导出的EXCL的表的值都多了个 \' 是什么原因,如原来的张三,在excl表中是 \'张三 谢谢
|
-- 作者:有点蓝 -- 发布时间:2017/3/10 22:37:00 -- 早Excel中\'后面代表的是字符串,这个不会影响使用 |