Foxtable(狐表)用户栏目专家坐堂 → 如何根据数据特征读出某些数据?


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

主题:如何根据数据特征读出某些数据?

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/8/18 11:59:00 [显示全部帖子]

Dim s As String = "苏办发[2013]112号"

Dim arr() As String = s.Split(new Char(){"[","]"})
For Each s1 As String In arr
    Output.Show(s1)
Next

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/8/18 14:13:00 [显示全部帖子]

不是很复杂的规则,没有必要使用正则,能够达到效果就行了

Dim s As String = "苏办发[2013]112号"

Dim arr() As String = s.Split(new Char(){"[","]"})
dr("字号") = arr(0)
dr("年度") = arr(1)
dr("编号") = arr(2).replace("","")

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/8/18 16:24:00 [显示全部帖子]

数据不是统一的这种格式吧:"苏办发[2013]112号"

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/8/18 16:45:00 [显示全部帖子]

数据如果没有规律就很难搞了

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


加好友 发短信
等级:超级版主 帖子:110648 积分:563148 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/8/18 16:50:00 [显示全部帖子]

只有3种情况好办,判断一下字符是否包含中括号([)就行了

if str1.contains("[") then
拆分处理
end if

 回到顶部