2021/04/12 #AddRangeメソッド

皆様おはようございます、

#猫でもできるPowerShell(備忘録)

#AddRangeメソッド

<# 元ネタ

https://www.atmarkit.co.jp/ait/articles/0607/26/news118_3.html

#>

$form = New-Object System.Windows.Forms.Form

$button = New-Object System.Windows.Forms.Button

$button.Location = New-Object System.Drawing.Point(180,10)

$button.Text = "押すな"

$button.add_Click({ $label.Text = "Get-Date -Format G"; $textbox.text

= (iex $label.Text) })

$label = New-Object System.Windows.Forms.Label

$label.Location = New-Object System.Drawing.Point(10, 10)

$label.Size = New-Object System.Drawing.Size(180,20)

# $form.Controls.AddRange*1

# $form.Controls.Add($button)

# $form.Controls.Add($label)

$textBox = New-Object System.Windows.Forms.TextBox

$textBox.Location = New-Object System.Drawing.Point(10,60)

$textBox.Size = New-Object System.Drawing.Size(180,20)

# $form.Controls.Add($textBox)

$button_L = New-Object System.Windows.Forms.Button

$button_L.Location = New-Object System.Drawing.Point(10,160)

$button_L.Text = "戻る"

$button_L.add_Click({ $textbox.text = (get-date $textbox.text ).adddays(-1) })

$button_R = New-Object System.Windows.Forms.Button

$button_R.Location = New-Object System.Drawing.Point(80,160)

$button_R.Text = "進む"

$button_R.add_Click({ $textbox.text = (get-date $textbox.text ).adddays(+1) })

# $form.Controls.Add($button_L)

# $form.Controls.Add($button_R)

$form.Controls.AddRange*2

[System.Windows.Forms.Application]::Run($form)

$form.Controls.Add の記載を $form.Controls.AddRange に置き換えてみました

パラメータの括弧が二重になる所がミソ?

ではまた;

*1:$button, $label

*2:$button,$label,$textBox,$button_L,$button_R