カレンダーコントロールの初期値

環境/言語:[VB.NET WEBアプリ]
分類:[ASP.NET]

お世話さまです。
カレンダーコントロールを使用しているのですが、
初期値をシステム日付から、違う日付にしたいのですが、
どのようにすれば良いのでしょうか？

Protected WithEvents Cld1 As System.Web.UI.WebControls.Calendar

Me.Cld1.SelectedDate = CDate(para1.Text)

↑実行すると、システム日付の月が表示され、
指定した月に移動すると日付が指定されてることが
確認できます。

■No6145に返信(まさしさんの記事)
> お世話さまです。
> カレンダーコントロールを使用しているのですが、
> 初期値をシステム日付から、違う日付にしたいのですが、
> どのようにすれば良いのでしょうか？
> Protected WithEvents Cld1 As System.Web.UI.WebControls.Calendar
> 
> Me.Cld1.SelectedDate = CDate(para1.Text)
> 
> ↑実行すると、システム日付の月が表示され、
> 指定した月に移動すると日付が指定されてることが
> 確認できます。

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        If IsDate(TextBox1.Text) = True Then
            Calendar1.SelectedDate = DateTime.Parse(TextBox1.Text)
            Calendar1.VisibleDate = Calendar1.SelectedDate
        End If
    End Sub

> Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
> If IsDate(TextBox1.Text) = True Then
> Calendar1.SelectedDate = DateTime.Parse(TextBox1.Text)
> Calendar1.VisibleDate = Calendar1.SelectedDate
> End If
> End Sub

できました。
ありがとうございました。