VB.net删除和保留文本框中的文字

[{“名称”：“chrisjj”，“uuid”：“d086112c-6e25-31a0-acf0-f95c3ca98784”，“到期日”：“2016-02-22 23:04:35+0000”}]

[{“名称”：“本”，“uuid”：“d086112c-7a26-33b5-ucf3-j96c1ca26854”，“到期”：“2015-011-12 22:04:35+0000”}]

---

基本上，我现在正在做一个项目，我正在尝试保留chrisjj和ben的名字，并在visual basic 2012中删除文本框中的其余部分。如果您有任何想法，这将非常有帮助，您可以使用regex实现您想要的功能

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()))

---

我想这就是你想要的。这个正则表达式匹配[{“name”：“然后是chrisjj或ben，一直到找到为止。”

您可以这样做：

If InStr(Textbox1.Text, "chrisjj") Then
Textbox1.text = "chrisjj"
else if InStr(Textbox1.Text, "ben") Then
Textbox1.text = "ben"
end if

返回一个字符串在另一个字符串中第一次出现的位置

同时

if TextBox1.Text.Contains("chrisjj") Then
TextBox1.Text = TextBox1.Text = "chrisjj"
ElseIf TextBox2.Text.Contains("ben") Then
TextBox1.Text = TextBox1.Text = ben
end if

---

返回一个值，该值指示指定的子字符串是否出现在该字符串中。

这不仅仅是一个花哨的字符串。它是json，表示一个对象，您可以使用“上的拆分函数”简化它，并使用索引4I prefer regex来实现这一点