Windows PowerShell （正式版リリース）1.0

.net関係だからコールドスタートが遅いな

ドトネトでFizzBuzzしてみたのでチラウラしてみる

[System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")
# Create
$form1 = New-Object System.Windows.Forms.Form
$Button1 = New-Object System.Windows.Forms.Button
$Listbox1 = New-Object System.Windows.Forms.ListBox


#
# Button1
#
$Button1_onclick = {
$ListBox.Items.Clear()
for($i = 0;$i -lt 100;$i++)
{
$str = $i.ToString()
if (($i % 3) -eq 0) {$str = 'Fizz'}
if (($i % 5) -eq 0) {$str = 'Buzz'}
if (($i % 15) -eq 0) {$str = 'Fizz Buzz'}
$ListBox.Items.Add($str)
}
}

$Button1.Dock = [ SYstem.Windows.Forms.DockStyle]::Top
$Button1.Location = New-Object System.Drawing.Point(0,0)
$Button1.Name = 'Button'
$Button1.Size = New-Object System.Drawing.Size(300,32)
$Button1.Text = 'Button'
$Button1.add_Click($Button1_onclick)

#
# Listbox
#
$Listbox1.Location = New-Object System.Drawing.Point(10,50)
$Listbox1.Dock = [ SYstem.Windows.Forms.DockStyle]::Fill

#
# form
#
$form.Controls.AddRange($Button1)
$form.Controls.AddRange($Listbox1)
$form.Name = 'form'
$form.Text = 'Fizz Buzz'
[System.Windows.Forms.Application]::Run($form)

フォーム使うならC#特急の方が手軽かな？ｗ