PowerShell GUI查询AD用户组时窗口关闭、结果不输出问题求助

• 点击Search按钮自动关窗：你给Search按钮设置了DialogResult = [System.Windows.Forms.DialogResult]::OK，用ShowDialog()唤起的模态窗口中，只要点击带非None值DialogResult的按钮，窗口会自动关闭并返回对应结果；同时你先后两次给$testform.AcceptButton赋值，close按钮的配置覆盖了Search按钮的设置，按回车会直接触发关闭逻辑。
• 结果无法输出到文本框：一是你把AD查询逻辑写在了ShowDialog()返回后的判断分支中，这段代码只有窗口关闭后才会执行，此时界面控件已经进入销毁流程，无法完成赋值；二是查询得到的组对象集合没有转成文本格式，也没有主动赋值给多行文本框的Text属性；三是部分控件的Location、Size参数直接传入字符串，没有实例化对应的Drawing对象，控件布局本身存在异常。

# 加载WinForm和绘图依赖程序集
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing

# 初始化主窗口
$testform = New-Object System.Windows.Forms.Form
$testform.Text = "AD用户组查询工具"
$testform.Size = New-Object System.Drawing.Size(550,400)
$testform.StartPosition = 'CenterScreen'
$testform.Topmost = $true

# 初始化Search按钮
$okb = New-Object System.Windows.Forms.Button
$okb.Location = New-Object System.Drawing.Point(85,130)
$okb.Size = New-Object System.Drawing.Size(75,25)
$okb.Text = 'Search'
$okb.DialogResult = [System.Windows.Forms.DialogResult]::None
$testform.Controls.Add($okb)

# 初始化关闭按钮
$closeBtn = New-Object System.Windows.Forms.Button
$closeBtn.Location = New-Object System.Drawing.Point(270,130)
$closeBtn.Size = New-Object System.Drawing.Size(75,25)
$closeBtn.Text = 'close'
$closeBtn.DialogResult = [System.Windows.Forms.DialogResult]::Cancel
$testform.Controls.Add($closeBtn)

# 配置窗口回车/ESC快捷键
$testform.AcceptButton = $okb
$testform.CancelButton = $closeBtn

# 初始化输入提示标签
$lb = New-Object System.Windows.Forms.Label
$lb.Location = New-Object System.Drawing.Point(20,40)
$lb.Size = New-Object System.Drawing.Size(240,20)
$lb.Text = 'Please enter the username:'
$testform.Controls.Add($lb)

# 初始化用户名输入框
$tb = New-Object System.Windows.Forms.TextBox
$tb.Location = New-Object System.Drawing.Point(40,80)
$tb.Size = New-Object System.Drawing.Size(240,20)
$testform.Controls.Add($tb)

# 初始化结果展示多行文本框
$textBoxDisplay = New-Object System.Windows.Forms.TextBox
$textBoxDisplay.Location = New-Object System.Drawing.Point(30, 175)
$textBoxDisplay.Multiline = $true
$textBoxDisplay.Name = "textBoxDisplay"
$textBoxDisplay.Size = New-Object System.Drawing.Size(470, 150)
$textBoxDisplay.ScrollBars = "Vertical"
$textBoxDisplay.ReadOnly = $true
$testform.Controls.Add($textBoxDisplay)

# 绑定Search按钮点击查询逻辑
$okb.Add_Click({
    $username = $tb.Text.Trim()
    if ([string]::IsNullOrWhiteSpace($username)) {
        [System.Windows.Forms.MessageBox]::Show("用户名不能为空") | Out-Null
        return
    }
    try {
        # 查询指定用户所属的AD组
        $groupNames = (Get-ADUser $username -Properties MemberOf).MemberOf | Get-ADGroup | Select-Object -ExpandProperty Name
        # 结果转为换行分隔文本写入展示框
        $textBoxDisplay.Text = $groupNames -join "`r`n"
    }
    catch {
        $textBoxDisplay.Text = "查询失败：$($_.Exception.Message)"
    }
})

$testform.Add_Shown({$tb.Select()})
$testform.ShowDialog() | Out-Null
# 释放窗口资源
$testform.Dispose()

• 移除Search按钮的预设OK DialogResult，改为绑定独立Click事件执行查询，点击后不会自动关闭窗口
• 修正AcceptButton/CancelButton配置，避免赋值覆盖，实现按回车触发查询、按ESC关闭窗口
• 所有控件的Location、Size参数统一使用System.Drawing.Point/System.Drawing.Size实例化，修复布局异常
• 将AD查询逻辑移到Search按钮的点击事件中，查询动作在窗口存续期间执行，可正常操作界面控件
• 查询结果提取纯组名字段，用换行符拼接为文本后赋值给多行文本框的Text属性，可正常展示
• 增加空输入校验、异常捕获、文本框滚动条和只读属性，优化基础交互

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