Question

在此处使用Microsoft Technet示例并粘贴在下面

https://technet.microsoft.com/en-us/library/ff730941.aspx?f=255&MSPPError=-2147217396

我无法将用户输入实际分配给变量$x

我已尝试在结尾[void] $objForm.ShowDialog()删除此行中的空格，但似乎始终返回取消文字

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

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

$objForm.KeyPreview = $True
$objForm.Add_KeyDown({if ($_.KeyCode -eq "Enter") 
    {$x=$objTextBox.Text;$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=$objTextBox.Text;$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 enter the information in the space below:"
$objForm.Controls.Add($objLabel) 

$objTextBox = New-Object System.Windows.Forms.TextBox 
$objTextBox.Location = New-Object System.Drawing.Size(10,40) 
$objTextBox.Size = New-Object System.Drawing.Size(260,20) 
$objForm.Controls.Add($objTextBox) 

$objForm.Topmost = $True

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

$x

Answer 1

此代码在PowerShell 1和2中运行良好，但在PowerShell 3中停止工作.PowerShell 3提供了一小组语法改进和通常的新cmdlet，但在较少公开的说明中，它被重写在{ {3}}，是脚本语言的自然选择。

向DLR的转移改变了Dynamic Language Runtime，我认为即使到今天也没有充分记录。具体来说，在脚本块（类似于用于创建委托的块）中，分配给变量会在块的范围内创建新变量。从模块化的角度来看，这是有道理的，但在脚本语言中并不那么明显。特别要考虑以下因素：

$x = 2
&{ 
    Write-Host $x;  
    $x = 3; Write-Host $x;
    Remove-Variable "x"; Write-Host $x
    $x = 3; 
}
Write-Host $x

打印：

在块中，x从父作用域中获取其值，但是当我们分配它时，我们实际上是在私有作用域中创建一个新变量。当我们删除该变量时，对x的任何引用都会再次来自父作用域。对x的分配不会影响父作用域中的值，正如我们可以从块外的Write-Host看到的那样。

这解释了为什么在委托中分配变量“不起作用”：您实际上是在委托内部分配一个新变量，当委托结束时，其值将丢失。要分配父作用域中的变量，必须使用显式限定符（$script:x或$global:x）。

无法从Powershell表单为变量赋值

1 个答案: