VB.Net 单击 MetroTextBox 时显示或显示 DateTimePicker
VB.Net Show or display DateTimePicker When MetroTextBox is Clicked
是否可以在单击文本框(MetroTextBox) 时显示日期时间选择器?好吧,我想做的是,当我单击文本框时,它会在文本框上方或文本框下方显示日期时间选择器,然后如果我 select 某个日期,它将在文本框中显示日期。
我有这个作为基础,但我无法让它发挥作用。
我使用 MonthCalendar 而不是 DTP 达到了我想要的结果。
这是供其他人将来参考的代码,以防他们需要相同的输出。谢谢,和平!...
Private Sub NotificationV2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MonthCalendar1.BringToFront()
MonthCalendar1.Location = New Point(265, 160)
MonthCalendar1.Visible = False
End Sub
Private Sub MetroTextBox8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MetroTextBox8.Click
MonthCalendar1.Visible = Not MonthCalendar1.Visible
End Sub
Private Sub MonthCalendar1_DateSelected(ByVal sender As Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateSelected
MonthCalendar1.Visible = False
MetroTextBox8.Text = e.Start.ToShortDateString
End Sub
是否可以在单击文本框(MetroTextBox) 时显示日期时间选择器?好吧,我想做的是,当我单击文本框时,它会在文本框上方或文本框下方显示日期时间选择器,然后如果我 select 某个日期,它将在文本框中显示日期。
我有这个作为基础,但我无法让它发挥作用。
我使用 MonthCalendar 而不是 DTP 达到了我想要的结果。
这是供其他人将来参考的代码,以防他们需要相同的输出。谢谢,和平!...
Private Sub NotificationV2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MonthCalendar1.BringToFront()
MonthCalendar1.Location = New Point(265, 160)
MonthCalendar1.Visible = False
End Sub
Private Sub MetroTextBox8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MetroTextBox8.Click
MonthCalendar1.Visible = Not MonthCalendar1.Visible
End Sub
Private Sub MonthCalendar1_DateSelected(ByVal sender As Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateSelected
MonthCalendar1.Visible = False
MetroTextBox8.Text = e.Start.ToShortDateString
End Sub