[求助]文本文件导入狐表如何去掉制表符 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]文本文件导入狐表如何去掉制表符

共有2326人关注过本帖树形打印复制链接主题：[求助]文本文件导入狐表如何去掉制表符

有点蓝

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109463 积分：556971 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2016/9/29 9:30:00 [显示全部帖子]

只是制表符的数量不同，看懂2楼的代码，自己计算制表符的个数，并相应改代码

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：109463 积分：556971 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2016/9/29 9:51:00 [显示全部帖子]

以2楼的项目表结构为例

Dim ip As New Importer

ip.SourcePath = "F:\H\问题测试\" '指定目录

ip.SourceTableName = "高2014级2016年秋正课表" '指定要导入的文件"订单.txt"

ip.NewTableName ="课表2" '导入后的表名

ip.Format = "Delimited" '指定导入格式

ip.Import()

Dim dr As Row

For i As Integer = 3 To Tables("课表2").Rows.Count - 2 Step 2

Dim arr() As String = Tables("课表2").Rows(i)(0).split("│")

dr = Tables("课表").AddNew

For j As Integer = 1 To arr.Length-2

dr(j-1) = arr(j).trim()

主题：[求助]文本文件导入狐表如何去掉制表符