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、保存。

這就完成了一個平時常用習慣的日期選擇控件