以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  替换的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=57995)
--  作者：qianqian1530
--  发布时间：2014/10/9 19:26:00
--  替换的问题
 e.Form.Controls("数据1").text.Replace("value_id:*|value_name:*","value_id:" & spd & "|value_name:" & Parts(0).Replace("(ID","")) 


value_id:*   想整成任意文字 怎么整啊 


还有个问题是 


字符串：   ID:1531|name:服装|spec_id:5312|spec_name:长袖|value_id:153|value_name:黑色

字符串格式是不变的， 值会变

 字符串格式ID:-|name:-|spec_id:-|spec_name:-|value_id:-|value_name:-


想取 spec_id的 值 5312
--  作者：有点甜
--  发布时间：2014/10/9 19:35:00
--  

 第一个问题

 

Dim str As String = "ID:1531|name:服装|spec_id:5312|spec_name:长袖|value_id:153|value_name:黑色"
Dim reg As new System.Text.RegularExpressions.Regex("(?<=value_id:+).+(?=\\|value_name+)")
str = reg.replace(str, "1111111111")
msgbox(str)
--  作者：有点甜
--  发布时间：2014/10/9 19:36:00
--  

 第二个问题

 

Dim str As String = "ID:1531|name:服装|spec_id:5312|spec_name:长袖|value_id:153|value_name:黑色"
Dim reg As new System.Text.RegularExpressions.Regex("(?<=spec_id:+).+(?=\\|spec_name+)")
Dim mc As Object = reg.matches(str)
msgbox(mc(0).Value)