こんにちは、PowerShellのカテゴリと判断してこちらに書き込みます。
PowerShellで、「カレンダーを表示させ、カレンダーの日付部分をクリックで選んだのちに、Selectボタンを押すと、テキストボックスのエリアにその日付が表示される」というものを作るつもりです。
やりたいことは二つあって、
①Selectボタンを押せば押すほど、テキストボックスのエリアには「追記」されていくようにしたい
現状、以下に示すコードでは、Selectを押すたびにテキストが上書きされてしまうだけになります。
②テキストボックスのエリアに表示されている日付は、最終的には、配列としてまとめてあとから、各行を取り出したい。
（テキストボックスに入力された文字列を取り出すにはどうしたら良いか）
よろしくおねがいします
#Form
[System.Reflection.Assembly]::LoadWithPartialName("System.windows.forms") | out-null
$CalForm = New-Object Windows.Forms.Form
$CalForm.Font = "MS UI Gothic,13"
$CalForm.text = "日付選択"
$CalForm.Size = New-Object Drawing.Size(500,280)
#Calendar
$Calendar = New-Object System.Windows.Forms.MonthCalendar
$Calendar.MaxSelectionCount = 128
$Calendar.Location = "10,1"
$Calendar.SetCalendarDimensions([int]1,[int]1)
$CalForm.Controls.Add($Calendar)
$CalForm.Controls.Add($button)
$CalForm.Add_Shown($CalForm.Activate())
$Calendar.ScrollChange = 1
#Select Button
$datePickerButton = New-Object System.Windows.Forms.Button
$datePickerButton.Location = "200,160"
$datePickerButton.Size = "75,23"
$datePickerButton.ForeColor = "DarkBlue"
$datePickerButton.BackColor = "White"
$datePickerButton.Text = "Select"
$datePickerButton.add_Click({
$outputBox.Text = $Calendar.SelectionStart
$outputBox.Text = $outputBox.Text.Substring(0,10) + "`r`n"
})
$CalForm.Controls.Add($datePickerButton)
#TextBox
$outputBox = New-Object System.Windows.Forms.TextBox
$outputBox.Location = New-Object System.Drawing.Size(280,10)
$outputBox.Size = New-Object System.Drawing.Size(200,180)
$outputBox.MultiLine = $True
$outputBox.ScrollBars = "Vertical"
$CalForm.Controls.Add($outputBox)
#Clear Button
$ButtonClose = New-Object System.Windows.Forms.Button
$ButtonClose.Location = New-Object System.Drawing.Point(31,200)
$ButtonClose.Text = "OK"
$ButtonClose.Add_Click({ $outputBox.Clear() })
$CalForm.Controls.Add($ButtonClose)
$CalForm.showdialog() | Out-Null
$Calendar.Selection
