WinForm中输入@符号后触发TextBox.AutoComplete的实现方法

问题描述 #

我尝试了两种实现方式，但目前只有当文本框输入的第一个字符与自动完成词汇的首字符匹配时，才会弹出自动完成提示。想实现输入过程中键入@符号时触发自动完成，完成邮箱地址补全，请问是否可行？

现有尝试代码 #

1. 文本框初始化代码

$tbxReminder.Location = (New-Object -TypeName System.Drawing.Point -ArgumentList @([System.Int32]12,[System.Int32]70))
$tbxReminder.Name = [System.String]'tbxReminder'
$tbxReminder.Size = (New-Object -TypeName System.Drawing.Size -ArgumentList @([System.Int32]220,[System.Int32]21))
$tbxReminder.TabIndex = [System.Int32]2
$tbxReminder.add_TextChanged($tbxReminder_TextChanged)
$tbxReminder.AutoCompleteSource = "CustomSource";
$tbxReminder.AutoCompleteMode = "SuggestAppend";
$autocomplete.AddRange(@("*@test.com", "apple", "banana", "cherry", "date"));

2. TextChanged事件处理（第二种尝试）

$tbxReminder_TextChanged = {
    $typedText = $tbxReminder.Text;
    $lastChar = $typedText.Remove(0, $typedText.Length - 1);
    if ($lastChar -eq "@")
    {
        Write-Host "@ symbol";
        $autocomplete.AddRange(@("*@test.com", "apple", "banana", "cherry", "date"))
        $tbxReminder.AutoCompleteCustomSource = $autocomplete
    }
    else
    {
        $tbxReminder.AutoCompleteCustomSource = $null;
    }
}

3. 第三种尝试

if ($tbxReminder.Text.IndexOf('@') -ge 0)
{
    Write-Host "@ symbol";
    $autocomplete = New-Object System.Windows.Forms.AutoCompleteStringCollection;
    $tbxReminder.AutoCompleteSource = "CustomSource";
    $tbxReminder.AutoCompleteMode = "SuggestAppend";
    $autocomplete.AddRange(@("*@test.com", "apple", "banana", "cherry", "date"))
    $tbxReminder.AutoCompleteCustomSource = $autocomplete;
}

问题分析 #

1. 通配符无效：WinForms文本框的自动补全默认是前缀匹配，*@test.com这种带通配符的候选词无法被识别，必须使用与输入前缀匹配的内容（比如直接用@test.com）。
2. 错误清空候选源：第二种尝试中，非@输入时将AutoCompleteCustomSource设为null，会导致后续即使输入@，自动补全功能也无法正常触发，因为候选源需要重新正确初始化赋值。
3. 边界场景未处理：通过Remove获取最后一个字符的方式，在文本为空时会抛出异常，鲁棒性不足。

可行解决方案 #

通过动态切换自动补全候选集，结合TextChanged事件实时更新，可以实现输入@时触发邮箱补全的效果。

修正后的代码

文本框初始化

# 提前初始化自动补全集合
$autocomplete = New-Object System.Windows.Forms.AutoCompleteStringCollection

$tbxReminder.Location = (New-Object -TypeName System.Drawing.Point -ArgumentList @(12,70))
$tbxReminder.Name = 'tbxReminder'
$tbxReminder.Size = (New-Object -TypeName System.Drawing.Size -ArgumentList @(220,21))
$tbxReminder.TabIndex = 2
$tbxReminder.AutoCompleteSource = [System.Windows.Forms.AutoCompleteSource]::CustomSource
$tbxReminder.AutoCompleteMode = [System.Windows.Forms.AutoCompleteMode]::SuggestAppend

# 绑定文本变更事件
$tbxReminder.add_TextChanged($tbxReminder_TextChanged)

事件处理脚本块

$tbxReminder_TextChanged = {
    $typedText = $tbxReminder.Text
    $hasAt = $typedText.Contains('@')

    # 清空现有候选，避免重复添加
    $autocomplete.Clear()

    if ($hasAt) {
        # 输入包含@时，添加邮箱域名候选
        $autocomplete.AddRange(@('@test.com', '@gmail.com', '@outlook.com'))
    } else {
        # 无@时，恢复普通候选（可根据需求调整或清空）
        $autocomplete.AddRange(@('apple', 'banana', 'cherry', 'date'))
    }

    $tbxReminder.AutoCompleteCustomSource = $autocomplete
}

说明 #

• 当输入文本包含@时，自动切换到邮箱域名候选集，此时输入@后，前缀匹配会触发补全提示；
• 无@时可恢复普通候选，也可根据需求清空候选集；
• 全程保持AutoCompleteSource和AutoCompleteMode的正确设置，避免中途置空候选源导致功能失效。

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