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对话框