What I need is a function that has a parameter of hour and minute. Then have it return the date for the next date with the hour and minute given. For example, if the hour fed into it was 9 and the minute was 30, then if the current date and time is 3/17/04 10:30AM then the function would return 3/18/04 9:30AM. On the other hand, if the example was 13 and 30 fed into it and the date currently is 3/17/04 2:30 PM, then the function would return 3/18/04 1:30PM. On the other hand, if the time was 3/17/04 8:00 AM and the numbers was 9, 30, then it would return 3/17/04 9:30AM. Must be coded with Visual Basic 6.0. Should be just the main procedure and the function. Should be something like this
sub main
dim newdate as date
newdate=calculatedate(9, 30)
end sub
public function calculatedate(whathour as integer, whatminute as integer)
dim newvalue as date
calculatedate=newvalue
end function
## Deliverables
The source code only to show the new date obtained based on the parameters sent in.
## Platform
Windows 2000, Windows XP