AskBeefOrChicken.ps1
# アセンブリの読み込み
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
# フォームの作成
$form = New-Object System.Windows.Forms.Form
$form.Text = "Question"
$form.Size = New-Object System.Drawing.Size(260,150)
# Chickenボタンの設定
$ChickenButton = New-Object System.Windows.Forms.Button
$ChickenButton.Location = New-Object System.Drawing.Point(40,70)
$ChickenButton.Size = New-Object System.Drawing.Size(75,30)
$ChickenButton.Text = "Chicken"
$ChickenButton.Add_Click({[System.Windows.Forms.MessageBox]::Show("Chicken is selected", "Result")})
# Beefボタンの設定
$BeefButton = New-Object System.Windows.Forms.Button
$BeefButton.Location = New-Object System.Drawing.Point(130,70)
$BeefButton.Size = New-Object System.Drawing.Size(75,30)
$BeefButton.Text = "Beef"
$BeefButton.Add_Click({[System.Windows.Forms.MessageBox]::Show("Beef is selected", "Result")})
# ラベルの設定
$label = New-Object System.Windows.Forms.Label
$label.Location = New-Object System.Drawing.Point(10,30)
$label.Size = New-Object System.Drawing.Size(250,20)
$label.Text = "Would you like to eat Chicken or Beef?"
# ボタン等をフォームに追加
$form.Controls.Add($ChickenButton)
$form.Controls.Add($BeefButton)
$form.Controls.Add($label)
# フォームを表示させ、その結果を受け取る
$result = $form.ShowDialog()
switch($result){
"Cancel"{Write-Output 'Nothing'}
}