VB.NET实现从RichTextBox1提取邮箱密码分别填入TextBox1、TextBox2

没问题，这个需求在自动注册机器人开发里很常见，咱们用两种方法来实现，分别应对不同的场景：

场景1：密码里没有冒号（常规情况） #

直接用字符串分割的方法就能快速搞定，代码如下：

' 获取RichTextBox中的原始内容，先清理前后空格避免干扰
Dim inputContent As String = RichTextBox1.Text.Trim()

' 按冒号分割成两部分
Dim splitParts() As String = inputContent.Split(":"c)

' 检查分割结果是否符合预期（至少包含邮箱和密码两部分）
If splitParts.Length >= 2 Then
    TextBox1.Text = splitParts(0).Trim() ' 提取邮箱到TextBox1
    TextBox2.Text = splitParts(1).Trim() ' 提取密码到TextBox2
Else
    ' 格式不对时的容错处理
    MessageBox.Show("请确保输入格式为「邮箱:密码」的形式！")
    TextBox1.Clear()
    TextBox2.Clear()
End If

场景2：密码里可能包含冒号（更严谨的情况） #

如果你的密码规则允许冒号存在，那上面的分割方法会把密码拆断，这时候咱们用查找第一个冒号位置的方法来截取：

Dim inputContent As String = RichTextBox1.Text.Trim()
Dim firstColonPos As Integer = inputContent.IndexOf(":")

' 确认冒号存在且不在开头（避免空邮箱的情况）
If firstColonPos > 0 Then
    TextBox1.Text = inputContent.Substring(0, firstColonPos).Trim()
    TextBox2.Text = inputContent.Substring(firstColonPos + 1).Trim()
Else
    MessageBox.Show("请确保输入格式为「邮箱:密码」的形式！")
    TextBox1.Clear()
    TextBox2.Clear()
End If

两种方法都加了Trim()处理，能避免输入内容前后不小心带的空格导致提取结果出错，也加了格式校验，防止程序因为输入异常崩溃，很适合自动注册机器人这种需要稳定性的场景。

内容的提问来源于stack exchange，提问作者Anony DealSmoke