[{“name”:“chrisjj”,“uuid”:“d086112c-6e25-31a0-acf0-f95c3ca98784”,“expiresOn”:“2016-02-22 23:04:35 +0000”}] < / p>
[{“name”:“ben”,“uuid”:“d086112c-7a26-33b5-ucf3-j96c1ca26854”,“expiresOn”:“2015-011-12 22:04:35 +0000”}] < / p>
基本上我正在研究一个项目一段时间,我正在尝试保留名称chrisjj和ben并从visual basic 2012中删除文本框中的其余文本,如果你有任何想法会有很大的帮助
答案 0 :(得分:1)
您可以使用正则表达式来实现您想要的效果。
Dim Input As String = RichTextBox1.Text
Dim MC As MatchCollection = Regex.Matches(Input, Regex.Escape("[{""name"":""") & "[chrisjj|ben].*?" & Regex.Escape("]"), RegexOptions.IgnoreCase)
Dim Output As New List(Of String)
For i = 0 To MC.Count - 1
Output.Add(MC(i).Value)
Next
MsgBox(String.Join(vbNewLine, Output.ToArray()))
我认为这就是你想要的。这个正则表达式匹配[{&#34; name&#34;:&#34;然后chrisjj或ben继续,直到]被发现。
答案 1 :(得分:0)
您可以这样做:
If InStr(Textbox1.Text, "chrisjj") Then
Textbox1.text = "chrisjj"
else if InStr(Textbox1.Text, "ben") Then
Textbox1.text = "ben"
end if
InStr Function返回第一次出现的一个字符串在另一个字符串中的位置。
同时强>
if TextBox1.Text.Contains("chrisjj") Then
TextBox1.Text = TextBox1.Text = "chrisjj"
ElseIf TextBox2.Text.Contains("ben") Then
TextBox1.Text = TextBox1.Text = ben
end if
String.Contains Method (String)返回一个值,指示在此字符串中是否出现指定的子字符串。