2016-02-22 77 views
-1

以下代碼給出選擇日期的第一天。MaskedTextBox的日期方法

例如,如果月份日曆控件的選擇日期爲20.02.2016,則以下代碼給出01.02.2016。

CLng((DateValue(MonthCalendar1.SelectionStart.AddDays(-MonthCalendar1.SelectionStart.Day + 1).ToShortDateString).ToOADate)) 

我決定用MaskedTextBox1控件替換MonthCalendar1控件。

那麼,如何重新設計MaskedTextBox1控件的上述代碼呢?

回答

1

嘗試:

Dim _date As Date = Date.Parse(MaskedTextBox1.Text) 
Dim _firstDayOfMonth As Date = New Date(_date.Year, _date.Month, 1) 
+0

非常感謝。解決了。 –