以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于字符串的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=136851)
--  作者：klkingkkk
--  发布时间：2019/6/23 0:56:00
--  关于字符串的问题
如下字符串

品牌型号:东风标致牌DC7162MSBM车辆识别代号:LDC6332T5J5555555发动机号码:4204868注册日期:

怎么提取字符串"东风标致牌DC7162MSBM"当然这个长度和内容都是不固定的但是前面是中文字后面是英文和数字混合这个格式是固定的 后面的字符串也不固定.
如果能提取那提取完了 怎么才能把 中文和英文数字混合 分开成二个字符串呢  一个是中文字符串  一个是英文数字字符串 


请教大神 解答一下  谢谢!!!!!
--  作者：有点甜
--  发布时间：2019/6/23 11:24:00
--  

Dim str = "品牌型号:东风标致牌DC7162MSBM车辆识别代号:LDC6332T5J5555555发动机号码:4204868注册日期:"
Dim mc = System.Text.RegularExpressions.Regex.Matches(str , "(?<=品牌型号:)([^a-zA-Z0-9]+)([a-zA-Z0-9]+)(?=车辆识别代号)")
If mc.count > 0 Then
    msgbox(mc(0).groups(0).Tostring)
    msgbox(mc(0).groups(1).Tostring)
    msgbox(mc(0).groups(2).Tostring)
End If

 
--  作者：klkingkkk
--  发布时间：2019/6/23 15:48:00
--  
版主你好！！谢谢你的回答。谢谢！！！！ Dim mc = System.Text.RegularExpressions.Regex.Matches(str , "(?<=品牌型号:)([^a-zA-Z0-9]+)([a-zA-Z0-9]+)(?=车辆识别代号)")这句是什意思啊
[此贴子已经被作者于2019/6/23 16:00:09编辑过]
--  作者：有点甜
--  发布时间：2019/6/23 16:44:00
--  

参考

 

https://www.runoob.com/regexp/regexp-metachar.html

 
--  作者：klkingkkk
--  发布时间：2019/6/23 17:02:00
--  
运行这句后
Dim mc = System.Text.RegularExpressions.Regex.Matches(str , "(?<=品牌型号:)([^a-zA-Z0-9]+)([a-zA-Z0-9]+)(?=车辆识别代号)")
出现如下提示
Conversion from type \'MatchCollection\' to type \'String\' is not valid.


好象是转出问题了   这话System.Text.RegularExpressions.Regex.Matches这个我不懂是什么意思  在帮助里面一个一个找也没有找到 所以怎么会出来这个问题是一点想法也没有  
麻烦了啊!!!!!

谢谢!!!!!!
--  作者：有点甜
--  发布时间：2019/6/23 18:13:00
--  

请完整测试代码

 

Dim str = "品牌型号:东风标致牌DC7162MSBM车辆识别代号:LDC6332T5J5555555发动机号码:4204868注册日期:"
Dim mc = System.Text.RegularExpressions.Regex.Matches(str , "(?<=品牌型号:)([^a-zA-Z0-9]+)([a-zA-Z0-9]+)(?=车辆识别代号)")
If mc.count > 0 Then
    msgbox(mc(0).groups(0).Tostring)
    msgbox(mc(0).groups(1).Tostring)
    msgbox(mc(0).groups(2).Tostring)
End If

 
--  作者：klkingkkk
--  发布时间：2019/6/23 18:58:00
--  
我就是全部执行了啊  就出现那个提示了  我是在窗口的DoubleClick事件里面运行的
--  作者：有点蓝
--  发布时间：2019/6/24 9:09:00
--  
2楼代码我测试没有问题，重新贴出更改后的代码，或者上传实例说明
--  作者：klkingkkk
--  发布时间：2019/6/24 9:43:00
--  
谢谢!!!!!!