VB.net DateTimePicker 初始化为空，选择后显示日期

目的：当某记录的日期数据为空的时候，DateTimePicker 不以默认当前时间显示。

优点：避免不规则的时间格式输入；符合平时遇到的时间输入习惯

缺点：设置要代码，没有textbox控件那么方便设置

步骤：

　　1、插入控件DateTimePicker

　　2、在A窗体(目标窗体)Load事件，或者 B窗体打开A窗体时 填入下列语句（我这里是使用B窗体打开A窗体）

            Dim frmSampleOrder As New frmSampleOrder
            frmSampleOrder.Show()
            If DataGridView1.Rows(e.RowIndex).Cells("计划发运日期").Value.ToString.Trim = "" Then
                frmSampleOrder.txt计划发运日期.Format = DateTimePickerFormat.Custom
                frmSampleOrder.txt计划发运日期.CustomFormat = " "
            Else
                frmSampleOrder.txt计划发运日期.Text = DataGridView1.Rows(e.RowIndex).Cells("计划发运日期").Value.ToString.Trim
            End If

　　3、在打开的A窗体中，选择DateTimePicker控件，并选择ValueChanged 事件，插入下列代码

    Private Sub txt计划发运日期_ValueChanged(sender As Object, e As EventArgs) Handles txt计划发运日期.ValueChanged
        txt计划发运日期.Format = DateTimePickerFormat.Short
    End Sub

　　4、保存。

这就完成了一个平时常用习惯的日期选择控件