DateTimePicker – reset focus

引用來源
--
這篇真是即時雨呀,讚~
之前為了鍵盤操作行為弄這個focus , 找不出怎設定
現這篇即可重置focus了

Private Sub DateTimePicker1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.Enter
    Dim fmt As DateTimePickerFormat = DateTimePicker1.Format

    DateTimePicker1.Format = DateTimePickerFormat.Long
    DateTimePicker1.Format = DateTimePickerFormat.Custom
    DateTimePicker1.Format = fmt 

End Sub