PowerShell文件时间监控GUI窗口无法移动且Runspace无输出求助

你的代码存在两个核心问题：

• 点击Start按钮后，while($true)循环加Start-Sleep 30直接阻塞了UI线程，导致窗口无法拖动、失去响应
• 尝试后台线程（Job/Runspace）时，跨线程直接访问WinForms控件不符合WinForms的线程安全规则，导致RichTextBox无输出

方案1：用WinForms Timer替代循环（最简单高效） #

Timer的Tick事件会在UI线程触发，既实现定时监控，又不会阻塞窗口操作：

$targetFile = "full path"

# Function - Add Text to RichTextBox
function Add-RichTextBox{
    [CmdletBinding()]
    param ($text)
    $richtext.Text += "$text`n"
    $richtext.SelectionStart = $richtext.TextLength
    $richtext.ScrollToCaret()
}

# Windows Form    
$form = New-Object System.Windows.Forms.Form
$form.Text = "Monitor script"
$form.Size = New-Object System.Drawing.Size(400,300)
$form.StartPosition = 'CenterScreen'

$Font = New-Object System.Drawing.Font("Tahoma",11)
$Form.Font = $Font
 
$label = New-Object System.Windows.Forms.Label
$label.Location = New-Object System.Drawing.Point(20,40)
$label.Size = New-Object System.Drawing.Size(200,20)
$label.Text = (Get-Date).ToString()
$form.Controls.Add($label)

# 创建Timer控件
$monitorTimer = New-Object System.Windows.Forms.Timer
$monitorTimer.Interval = 30000 # 30秒，单位毫秒
$monitorTimer.Add_Tick({
    $lastdate = Get-ChildItem $targetFile
    $Date = $lastdate.LastAccessTime.ToString()
    Add-RichTextBox "$date"
})

$StartButton = New-Object System.Windows.Forms.Button
$StartButton.Location = New-Object System.Drawing.Point(150,220)
$StartButton.Size = New-Object System.Drawing.Size(100,33)
$StartButton.Text = 'Start'
$form.AcceptButton = $StartButton
$form.Controls.Add($StartButton)
$StartButton.Add_click({
    # 点击Start后启动Timer
    $monitorTimer.Start()
    # 禁用按钮防止重复点击
    $StartButton.Enabled = $false
})

# RichTextBox
$richtext = new-object System.Windows.Forms.RichTextBox
$richtext.Location = New-Object System.Drawing.Point(20,60)
$richtext.multiline = $true
$richtext.Name = "Results"
$richtext.text = "Results:`n"
$richtext.scrollbars = "Both"
$richtext.Height  = 120
$richtext.width = 350
$richtext.font = new-object system.drawing.font "Lucida Console",10
$Form.controls.add($richtext)

$Form.Add_Shown({$Form.Activate()})
# 关闭窗口时停止Timer
$form.Add_FormClosed({ $monitorTimer.Stop() })

$form.ShowDialog()

方案2：用Runspace实现后台监控（适合复杂逻辑） #

如果必须用后台线程，需要通过控件的Invoke方法，让控件更新操作回到UI线程执行：

$targetFile = "full path"

# Windows Form    
$form = New-Object System.Windows.Forms.Form
$form.Text = "Monitor script"
$form.Size = New-Object System.Drawing.Size(400,300)
$form.StartPosition = 'CenterScreen'

$Font = New-Object System.Drawing.Font("Tahoma",11)
$Form.Font = $Font
 
$label = New-Object System.Windows.Forms.Label
$label.Location = New-Object System.Drawing.Point(20,40)
$label.Size = New-Object System.Drawing.Size(200,20)
$label.Text = (Get-Date).ToString()
$form.Controls.Add($label)

$richtext = new-object System.Windows.Forms.RichTextBox
$richtext.Location = New-Object System.Drawing.Point(20,60)
$richtext.multiline = $true
$richtext.Name = "Results"
$richtext.text = "Results:`n"
$richtext.scrollbars = "Both"
$richtext.Height  = 120
$richtext.width = 350
$richtext.font = new-object system.drawing.font "Lucida Console",10
$Form.controls.add($richtext)

$StartButton = New-Object System.Windows.Forms.Button
$StartButton.Location = New-Object System.Drawing.Point(150,220)
$StartButton.Size = New-Object System.Drawing.Size(100,33)
$StartButton.Text = 'Start'
$form.AcceptButton = $StartButton
$form.Controls.Add($StartButton)

$StartButton.Add_click({
    $StartButton.Enabled = $false
    # 创建Runspace
    $runspace = [RunspaceFactory]::CreateRunspace()
    $runspace.ApartmentState = [System.Threading.ApartmentState]::STA
    $runspace.ThreadOptions = [System.Management.Automation.Runspaces.PSThreadOptions]::UseNewThread
    $runspace.Open()

    # 传递UI控件引用到后台线程
    $ps = [PowerShell]::Create().AddScript({
        param($targetFile, $richtext)
        while($true){
            $lastdate = Get-ChildItem $targetFile
            $Date = $lastdate.LastAccessTime.ToString()
            
            # 使用Invoke在UI线程更新RichTextBox
            $richtext.Invoke([Action[string]]{
                param($text)
                $richtext.Text += "$text`n"
                $richtext.SelectionStart = $richtext.TextLength
                $richtext.ScrollToCaret()
            }, $Date)
            
            Start-Sleep 30
        }
    }).AddParameter('targetFile', $targetFile).AddParameter('richtext', $richtext)

    $ps.Runspace = $runspace
    $asyncResult = $ps.BeginInvoke()

    # 窗口关闭时清理Runspace
    $form.Add_FormClosed({
        $ps.Stop()
        $ps.Dispose()
        $runspace.Close()
        $runspace.Dispose()
    })
})

$Form.Add_Shown({$Form.Activate()})
$form.ShowDialog()

关键说明 #

1. UI线程阻塞问题：WinForms的所有UI操作都在主线程执行，无限循环加Sleep会占用主线程，导致窗口无法处理拖动、刷新等消息，用Timer可以完美避免这个问题。
2. 线程安全问题：WinForms控件不允许跨线程直接访问，必须通过Invoke或BeginInvoke方法，将控件操作委托到UI线程执行，否则会出现无输出、控件异常甚至程序崩溃。

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