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

Dim str As String = FileSys.ReadAllText(ProjectPath & "单位信息2.txt",Encoding.Default)

Dim str_A() As String = str.Split(vbcrlf)

With Tables("单位信息")

Dim r As Row = .Current

For i As Integer = 0 To str_A.Length - 1

MessageBox.Show(str_A(i))

MessageBox.Show(.Cols(i).Name)

r(.Cols(i).Name) = str_A(i)

End With

下载信息 [文件大小：下载次数： ]
点击浏览该文件:开piao辅助器.zip

文本文件中的每一行数据应该写入当前行对应的列中，可并没有得到想要的结果，不知何故？请大侠指点。

另有数据显示不正常。单元格本身有值，但不显示，双击单元格后却能看到值。不知何故？

[此贴子已经被作者于2016/7/2 23:07:44编辑过]

主题：[求助]文本文件的合并