Foxtable(狐表)用户栏目专家坐堂 → 关于csv文件导入,正则表达式解析错误的情况


  共有972人关注过本帖平板打印复制链接

主题:关于csv文件导入,正则表达式解析错误的情况

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


加好友 发短信
等级:一尾狐 帖子:459 积分:3471 威望:0 精华:0 注册:2011/6/6 11:22:00
关于csv文件导入,正则表达式解析错误的情况  发帖心情 Post By:2024/1/2 21:40:00 [只看该作者]

 使用下面的代码来导入csv文件的数据,先讲csv文件后缀名改为txt:

Dim dlg As new OpenFileDialog
dlg.Filter = "文本文件|*.txt"
If dlg.ShowDialog = DialogResult.OK Then
    Dim strs As String = FileSys.ReadAllText(dlg.FileName,encoding.default)
    strs = strs.Replace(vblf,"")
    Dim rs() As String = strs.Split(vbcr)    
    Dim cs As New List(Of String)
    Dim mc = System.Text.RegularExpressions.Regex.Matches(rs(6), "(?<="").+?(?="")|(?<=,|^)[^""]*?(?=,|$)")
    For j As Integer = 0 To mc.count-1
        output.show(mc(j).value.trim(","))
    Next
End If

图片点击可在新窗口打开查看

但是对于第二行记录中,数据为空的,在解析时,无法正常作为一个空值来对应到相应的字段,比如年龄和工龄,请蓝版对Dim mc = System.Text.RegularExpressions.Regex.Matches(rs(6), "(?<="").+?(?="")|(?<=,|^)[^""]*?(?=,|$)")   进行优化。


 回到顶部