Add-Type -AssemblyName System.Windows.Forms
[System.Windows.Forms.Application]::EnableVisualStyles()
$Form = New-Object system.Windows.Forms.Form
$Form.ClientSize = New-Object System.Drawing.Point(640,480)
$Form.text = "Get system information ..."
$Form.TopMost = $false
$Button1 = New-Object system.Windows.Forms.Button
$Button1.text = "Video Card"
$Button1.width = 76
$Button1.height= 33
$Button1.location = New-Object System.Drawing.Point(16,11)
$Button1.Font = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
$Label1 = New-Object system.Windows.Forms.Label
$Label1.text = ""
$Label1.AutoSize = $true
$Label1.width = 25
$Label1.height = 8
$Label1.location = New-Object System.Drawing.Point(20,70)
$Label1.Font = New-Object System.Drawing.Font('Microsoft Sans Serif',10)
$Form.controls.AddRange(@($Button1,$Label1))
$Button1.Add_Click({ run })
function run { $Label1.text = wmic path win32_VideoController get name}
[void]$Form.ShowDialog()