Set value of the datetime picker to default to the current date vb6

I need help to set the value of the date time picker control to the current date . I need to allow my users to enter a date in the past so setting the min date property to today is not an option. Any alternatives? I have tried and . This is not giving the results I expect, its giving me another date, today its giving me yesterdays date