2

我正在尝试编写一个包含列表框的 PowerShell 脚本。为了确保我对所需的概念有所了解，我在 TechNet 上查找了教程并尝试复制提供的代码。

http://technet.microsoft.com/en-us/library/ff730949.aspx

如果我正确地遵循演练和脚本，则脚本似乎旨在显示一个对话框，然后将所选项目输出到 CLI。我复制了对话框，但无法将选择写入 CLI。我什至修改了最后一行以显式调用 Write-Output 以显示 $x 的值。

这个脚本的一切似乎都按预期工作，除了实际写出 $x 的任何值。由于echo "$x"这可能是所有代码中最简单的一行，我只能假设问题实际上在于将数据写入$x 。

下面是我的 PowerShell ISE 窗口中的剪切和粘贴，它又是从上述 TechNet 文章中剪切和粘贴的：

[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing") 

$objForm = New-Object System.Windows.Forms.Form 
$objForm.Text = "Select a Computer"
$objForm.Size = New-Object System.Drawing.Size(300,200) 
$objForm.StartPosition = "CenterScreen"

$objForm.KeyPreview = $True
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Enter") 
    {$x=$objListBox.SelectedItem;$objForm.Close()}})
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Escape") 
    {$objForm.Close()}})

$OKButton = New-Object System.Windows.Forms.Button
$OKButton.Location = New-Object System.Drawing.Size(75,120)
$OKButton.Size = New-Object System.Drawing.Size(75,23)
$OKButton.Text = "OK"
$OKButton.Add_Click({$x=$objListBox.SelectedItem;$objForm.Close()})
$objForm.Controls.Add($OKButton)

$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(150,120)
$CancelButton.Size = New-Object System.Drawing.Size(75,23)
$CancelButton.Text = "Cancel"
$CancelButton.Add_Click({$objForm.Close()})
$objForm.Controls.Add($CancelButton)

$objLabel = New-Object System.Windows.Forms.Label
$objLabel.Location = New-Object System.Drawing.Size(10,20) 
$objLabel.Size = New-Object System.Drawing.Size(280,20) 
$objLabel.Text = "Please select a computer:"
$objForm.Controls.Add($objLabel) 

$objListBox = New-Object System.Windows.Forms.ListBox 
$objListBox.Location = New-Object System.Drawing.Size(10,40) 
$objListBox.Size = New-Object System.Drawing.Size(260,20) 
$objListBox.Height = 80

[void] $objListBox.Items.Add("atl-dc-001")
[void] $objListBox.Items.Add("atl-dc-002")
[void] $objListBox.Items.Add("atl-dc-003")
[void] $objListBox.Items.Add("atl-dc-004")
[void] $objListBox.Items.Add("atl-dc-005")
[void] $objListBox.Items.Add("atl-dc-006")
[void] $objListBox.Items.Add("atl-dc-007")

$objForm.Controls.Add($objListBox) 

$objForm.Topmost = $True

$objForm.Add_Shown({$objForm.Activate()})
[void] $objForm.ShowDialog()

echo "$x"

当上面没有按预期工作时，我决定按照教程一步一步地自己重新编写脚本。我对其进行了一些修改，以更好地适应我的组织偏好并在此过程中添加注释。然而，现在连对话框本身都坏了。

# Load Windows Forms & Drawing classes.
[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing")

# Create base form.
$objForm = New-Object System.Windows.Forms.Form
$objForm.Text = "Select a Computer"
$objForm.Size = New-Object System.Drawing.Size(300,200)
$objForm.StartPosition = "CenterScreen"

# Configure keyboard intercepts for ESC & ENTER.
$objForm.KeyPreview = $true
$objForm.Add_KeyDown({
    if ($_.KeyCode -eq "Enter")
    {
        $x = $objListBox.SelectedItem
        $objForm.Close()
    }
})
$objForm.Add_KeyDown({
    if ($_.KeyCode -eq "Escape")
    {
        $objForm.Close()
    }
})

# Create OK button.
$OKButton = New-Object System.Windows.Forms.Button
$OKButton.Location = New-Object System.Drawing.Size(75,120)
$OKButton.Size = New-Object System.Drawing.Size(75,23)
$OKButton.Text = "OK"
$OKButton.Add_Click({
    $x = $objListBox.SelectedItem
    $objForm.Close()
})
$objForm.Controls.Add($OKButton)

# Create Cancel button.
$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(150,120)
$CancelButton.Size = New-Object System.Drawing.Size(75,23)
$CancelButton.Text = "Cancel"
$CancelButton.Add_Click({
    $objForm.Close()
})
$objForm.Controls.Add($CancelButton)

# Add form prompt text.
$objLabel = New-Object System.Windows.Forms.Label
$objLabel.Location = New-Object System.Drawing.Size(10,20)
$objLabel.Text = "Please select a computer:"
$objForm.Controls.Add($objLabel)

# Add list box.
$objListBox = New-Object System.Windows.Forms.ListBox
$objListBox.Location = New-Object System.Drawing.Size(10,40)
$objListBox.Size = New-Object System.Drawing.Size(260,20)
$objListBox.Height = 80

# Populate list.
[void] $objListBox.Items.Add("Option1")
[void] $objListBox.Items.Add("Option2")
[void] $objListBox.Items.Add("Option3")
[void] $objListBox.Items.Add("Option4")
[void] $objListBox.Items.Add("Option5")
[void] $objListBox.Items.Add("Option6")
[void] $objListBox.Items.Add("Option7")

# Force list box to display on top of other windows.
$objForm.TopMost = $true

# Display list box.
$objForm.Add_Shown({
    $objForm.Activate()
})
[void] $objForm.ShowDialog()

# Show result.
$x

第二个代码块导致：

损坏的列表框

我在这里做错了什么？

注意：我在 Windows 7 上运行 PowerShell 3.0

4

2 回答 2

5

获得列表框功能的一种简单方法是使用Out-GridView. 例如：

'one','two','three','four' | Out-GridView -OutputMode Single

用户可以选择一个项目，它将在管道中返回。

您也可以-OutputMode Multiple用于多选。

另一个例子：

get-process | Out-GridView -OutputMode Multiple

在此处输入图像描述

这将返回选定的对象：

Handles  NPM(K)    PM(K)      WS(K) VM(M)   CPU(s)     Id ProcessName
-------  ------    -----      ----- -----   ------     -- -----------
    396      24     5008       8964   113     8,88   3156 AuthManSvr
于 2015-01-07T04:41:21.077 回答
1

将 OK 按钮单击处理程序修改为：

$OKButton.Add_Click({$global:x=$objListBox.SelectedItem;$objForm.Close()})

请注意变量的global:范围说明符的使用。$xPowerShell 使用动态作用域并对变量采用“写时复制”方法。也就是说，假设 $x 在全局范围内定义，$x在函数中修改只会修改变量的本地副本。如果您的意图是修改 $x 的全局值，则必须使用全局说明符，例如$global:x = ...。

于 2013-08-13T02:10:51.247 回答