vb.net - как установить сегодняшний день в качестве даты по умолчанию для средства выбора времени?

As свойства Значение средства выбора даты / времени не позволяет ввести значение по умолчанию DateTime.Now, я попытался установить его в коде:

Private Sub DataFrom_ValueChanged(sender As System.Object, e As System.EventArgs) Handles DataForm.ValueChanged

     DataFrom.Value = DateTime.Now

End Sub

Он действительно показывает текущую дату при открытии формы с помощью средства выбора даты / времени . Однако нельзя установить любую другую дату из раскрывающегося календаря (можно выбрать дату, что означает, что календарь раскрывается, позволяя указать дату, но после щелчка по выбору значение выбора даты / времени возвращается к текущей дате) .

Заранее благодарю за некоторые указания. Марек