以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  rs(i).Split(vbtab) '没有按空格分隔  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104219)

--  作者:fubblyc
--  发布时间:2017/7/25 17:16:00
--  rs(i).Split(vbtab) '没有按空格分隔
老师,

有个文本文件如下:
12345  19  空格分开
12346  20

要合并到表A去

    Dim strs As String = FileSys.ReadAllText(wjlj,Encoding.Default)    
    strs = strs.Replace(vblf,"")
    Dim rs() As String = strs.Split(vbcr)
    For i As Integer = 0 To rs.Length - 1
        Dim cs() As String = rs(i).Split(vbtab)  \'奇怪,没有按空格分成两个数组。还是只要一个数组。文本和这里同时改成用 “|” ,就可以隔开
        If cs.Length = 2 Then   
            Dim dr As DataRow = DataTables("A").Addnew()
            dr("第一列") = cs(0)
            dr("第二列") = cs(1)
        End If
    Next


[此贴子已经被作者于2017/7/25 17:16:49编辑过]

--  作者:有点甜
--  发布时间:2017/7/25 17:45:00
--  

vbtab不是空格,改一下代码

 

Dim cs() As String = rs(i).Split(" ")


--  作者:fubblyc
--  发布时间:2017/7/25 19:22:00
--  
哦哦。
那VBTAB 是什么呢?帮助上是这样写的。。。

--  作者:有点蓝
--  发布时间:2017/7/25 20:27:00
--  
是一个特殊字符,看起来像空格,其实不是空格