I have not had much luck with several of the controls ( probably more because I don’t know what I am doing ), but the dtpicker seems to work. Add the dtpicker activex component to your project and play about. This works to change from date to time for example:
Dim v as variant
v=2
DTPicker1.Format=v