1. 程式人生 > >VB.net DateTimePicker 初始化為空,選擇後顯示日期

VB.net DateTimePicker 初始化為空,選擇後顯示日期

datetime 當前時間 平時 ext order cell net tostring load

目的:當某記錄的日期數據為空的時候,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、保存。

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

VB.net DateTimePicker 初始化為空,選擇後顯示日期