你这样必须要有view和multiview结合的,否则不行,你可以用一个textbox和一个button按钮做也行代码如下: #Region "点击按钮" Protected Sub Button_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles startButton.Click If TextBox.Text.Trim() <> "" Then Calendar.SelectedDate = Convert.ToDateTime(TextBox.Text) End If Calendar.Visible = True End Sub #End Region