导出以后,去掉就好。
Dim ex As New Exporterex.SourceTableName = "表A" '指定导出表ex.Header= False '去掉列名ex.FilePath = "c:\" '指定目标文件路径ex.Format ="Delimited" '导出格式为符号分割的文本文件ex.NewTableName = "订单" '指定文件名,注意无须扩展名ex.Export() '开始导出
Dim str As String = FileSys.ReadAllText("c:\订单.txt", Encoding.Default)str = str.replace("""", "")FileSys.WriteAllText("c:\订单.txt", str, False, Encoding.Default)