Foxtable(狐表)用户栏目专家坐堂 → rs(i).Split(vbtab) '没有按空格分隔


  共有1759人关注过本帖树形打印复制链接

主题:rs(i).Split(vbtab) '没有按空格分隔

帅哥哟,离线,有人找我吗?
fubblyc
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
rs(i).Split(vbtab) '没有按空格分隔  发帖心情 Post By:2017/7/25 17:16:00 [只看该作者]

老师,

有个文本文件如下:
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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/25 17:45:00 [只看该作者]

vbtab不是空格,改一下代码

 

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


 回到顶部
帅哥哟,离线,有人找我吗?
fubblyc
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2355 积分:16187 威望:0 精华:0 注册:2013/9/1 8:09:00
  发帖心情 Post By:2017/7/25 19:22:00 [只看该作者]

哦哦。
那VBTAB 是什么呢?帮助上是这样写的。。。

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/25 20:27:00 [只看该作者]

是一个特殊字符,看起来像空格,其实不是空格

 回到顶部