Если вы заполняете поле с помощью средства выбора даты, будет заполнено только значение даты для выбранной даты без компонента времени.
Если вы хотите ввести дату с компонентом времени, выпотребуется либо ввести дату и время вручную в элемент управления, либо заполнить значение элемента управления автоматически с помощью функции Now()
.
Поскольку вы хотите записать дату и время, когда пользователь щелкнул элементкнопку, просто заполните значение поля, используя функцию Now()
как часть обработчика события для события OnClick
элемента управления кнопки, например:
Private Sub YourButton_Click()
YourDateControl.Value = Now()
' ... Do other stuff ...
End Sub