VB.Net日期控件(DateTimePicker)

日期控件(DateTimePicker)控件允許通過編輯控件中顯示的值來選擇日期和時間。如果單擊DateTimePicker控件中的箭頭,它將顯示一個月份日曆,如組合框控件。用戶可以通過點擊所需日期進行選擇。新的選定值出現在控件的文本框部分。在窗體中顯示效果如下所示 -

MinDateMaxDate屬性用來限制日期範圍。

DateTimePicker控件的屬性

以下是DateTimePicker 控件的一些常用屬性:

編號 屬性 描述
1 BackColor 獲取或設置一個值,該值指示DateTimePicker控件的背景顏色。
2 BackgroundImage 獲取或設置控件的背景圖像。
3 BackgroundImageLayout 獲取或設置DateTimePicker控件的背景圖像的佈局。
4 CalendarFont 獲取或設置應用於日曆的字體樣式。
5 CalendarForeColor 獲取或設置日曆的前景色。
6 CalendarMonthBackground 獲取或設置日曆月份的背景顏色。
7 CalendarTitleBackColor 獲取或設置日曆標題的背景顏色。
8 CalendarTitleForeColor 獲取或設置日曆標題的前景色。
9 CalendarTrailingForeColor 獲取或設置日曆追蹤日期的前景色。
10 Checked 獲取或設置一個值,該值指示Value屬性是否設置了有效的日期/時間值,並且可以更新顯示的值。
11 CustomFormat 獲取或設置自定義日期/時間格式字串。
12 DropDownAlign 獲取或設置DateTimePicker控件上的下拉日曆的對齊方式。
13 ForeColor 獲取或設置DateTimePicker控件的前景色。
14 Format 獲取或設置控件中顯示的日期和時間的格式。
15 MaxDate 獲取或設置控件中可以選擇的最大日期和時間。
16 MaximumDateTime 獲取DateTimePicker控件允許的最大日期值。
17 MinDate 獲取或設置控件中可以選擇的最小日期和時間。
18 MinimumDateTime 獲取DateTimePicker控件允許的最小日期值。
19 PreferredHeight 獲取DateTimePicker控件的首選高度。
20 RightToLeftLayout 獲取或設置DateTimePicker的內容是否從右向左排列。
21 ShowCheckBox 獲取或設置一個值,該值指示複選框是否顯示在所選日期的左側。
22 ShowUpDown 獲取或設置一個值,該值指示是否使用旋鈕控件(也稱為上下控件)來調整日期/時間值。
23 Text 獲取或設置與此控件關聯的文本。
24 Value 獲取或設置分配給控件的日期/時間值。

DateTimePicker控件的方法

以下是DateTimePicker控件的一些常用方法:

編號 方法 描述
1 ToString 返回表示控件的字串。
編號 事件 描述
1 BackColorChanged BackColor屬性的值更改時發生。
2 BackgroundImageChanged BackgroundImage屬性的值更改時發生。
3 BackgroundImageLayoutChanged BackgroundImageLayout屬性的值更改時發生。
4 Click 在單擊控件時發生。
5 CloseUp 當下拉日曆被收起關閉並消失時發生。
6 DoubleClick 在雙擊控件時發生。
7 DragDrop 在拖放操作完成時發生。
8 ForeColorChanged ForeColor屬性的值更改時發生。
9 FormatChanged Format屬性值更改時發生。
10 MouseClick 在用滑鼠單擊控件時發生。
11 MouseDoubleClick 在用滑鼠雙擊控件時發生。
12 PaddingChanged Padding屬性的值更改時發生。
13 Paint 在控件重繪時發生。
14 RightToLeftLayoutChanged RightToLeftLayout屬性更改時發生。
15 TextChanged Text屬性的值發生更改時發生。
16 ValueChanged Value屬性更改時發生。

示例

在這個例子中,創建一個計算假期的小應用程式。在窗體上添加兩個DateTimePicker控件,用戶將在其中輸入休假日期和加入日期。另一個按鈕控件來執行計算和適當的標籤控件來顯示資訊。

設計的窗體視圖:

在代碼編輯器窗口中添加以下代碼:

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ' Set the caption bar text of the form.
        Me.Text = "DateTimePicker示例 - xuhuhu.com"
    End Sub
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim d1 As DateTime = DateTimePicker1.Value
        Dim d2 As DateTime = DateTimePicker2.Value
        Dim result As TimeSpan = d2.Subtract(d1)
        Dim days As Integer = result.TotalDays
        Label1.Text = "共 " + days.ToString + " 天"
    End Sub
End Class

當上面的代碼執行並使用Microsoft Visual Studio工具欄上的“開始”按鈕運行時,它將顯示以下窗口:

選擇兩個日期,然後點擊按鈕以進行計算:


上一篇: VB.Net基本控件 下一篇: VB.Net對話框