在PowerShell中实现System.Windows.Forms.ComboBox不可选首选项及提示文本

实现两个需求的方法： #

1. 添加下拉框上方的提示文本 #

通过创建System.Windows.Forms.Label控件，设置好文本、位置和样式后添加到窗体即可。

2. 设置首选项不可选 #

WinForms的ComboBox没有直接禁用单个项的属性，我们可以通过两种方式实现：

• 提交时验证：如果用户选中的是提示项，弹出提示并阻止窗体关闭
• 拦截选择操作：当用户试图选择提示项时，自动恢复到之前的有效选择（优化体验）

修改后的完整代码 #

Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing

$emailForm = New-Object System.Windows.Forms.Form
$emailForm.ClientSize = '400,200'
$emailForm.Text = "Select Email Address"
$emailForm.StartPosition = "CenterScreen"
$emailForm.KeyPreview = $true
$emailForm.Add_KeyDown({
    if ($_.KeyCode -ieq "Escape") {
        $emailForm.Close()
    }
})

# 添加下拉框上方的提示文本Label
$promptLabel = New-Object System.Windows.Forms.Label
$promptLabel.Text = "请选择您的邮箱地址："
$promptLabel.Location = New-Object System.Drawing.Point(50, 20)
$promptLabel.Font = [System.Drawing.Font]::New("Microsoft Sans Serif", 10)
$emailForm.Controls.Add($promptLabel)

$emailList = New-Object System.Windows.Forms.ComboBox
$emailList.Text = ""
$emailList.Width = 270
$emailList.AutoSize = $true
$emailList.DropDownStyle = [System.Windows.Forms.ComboBoxStyle]::DropDownList # 设置为只能选择列表项，禁止手动输入
$emailList.Items.Insert(0, "--- Please Select Email ---")

@(
    'email1@fqdn.tld',
    'email2@fqdn.tld'
) | ForEach-Object {
    [void] $emailList.Items.Add($_)
}

$emailList.SelectedIndex = 0
$emailList.Location = New-Object System.Drawing.Point(50,50)
$emailList.Font = [System.Drawing.Font]::New("Microsoft Sans Serif", 10)

# 记录上一次有效选择的索引，拦截提示项选择
$lastValidIndex = 0
$emailList.Add_SelectedIndexChanged({
    if ($emailList.SelectedIndex -eq 0) {
        # 用户选择提示项时，恢复到上一次有效选择
        if ($lastValidIndex -ne 0) {
            $emailList.SelectedIndex = $lastValidIndex
        }
    } else {
        # 更新有效选择索引
        $lastValidIndex = $emailList.SelectedIndex
    }
})

$emailForm.Controls.Add($emailList)

$emailButton = New-Object System.Windows.Forms.Button
$emailButton.Location = New-Object System.Drawing.Size(255,100)
$emailButton.Size = New-Object System.Drawing.Size(65,30)
$emailButton.Text = "Select"

$emailForm.Add_KeyDown({
    if ($_.KeyCode -ieq "Enter") {
        $emailButton.PerformClick()
    }
})

$emailButton.Add_Click({
    # 提交时验证是否选中有效邮箱
    if ($emailList.SelectedIndex -eq 0) {
        [System.Windows.Forms.MessageBox]::Show("请选择一个有效的邮箱地址！", "提示", [System.Windows.Forms.MessageBoxButtons]::OK, [System.Windows.Forms.MessageBoxIcon]::Warning)
        return
    }
    $script:emailSelect = $emailList.SelectedItem
    $emailForm.Close()
})
$emailForm.Controls.Add($emailButton)

[void] $emailForm.ShowDialog()

关键改动说明： #

1. 添加提示文本：新增$promptLabel控件，设置文本和位置后添加到窗体，放在下拉框上方。
2. 限制输入方式：将ComboBox的DropDownStyle设为DropDownList，避免用户手动输入无效内容。
3. 拦截提示项选择：通过SelectedIndexChanged事件，当用户试图选择提示项时，自动恢复到之前的有效选择。
4. 提交验证：在按钮点击事件中判断选中项，若为提示项则弹出警告并阻止窗体关闭，确保用户选择有效邮箱。

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