[RESOLVED] Adding to a date?

[Teseng]

I'm trying to create a timescale, and need to add 5 minutes to a date every 10 seconds, i have a timer setup on the right interval, but i can't figure out how to add 10 minutes to a DATE variable.

Doing MyTime = MyTime + 10 just adds 10 days, i tried using 0.1 and it went wacko and displayed a seemingly random time. Any help?

[Arachnid13]

VB has a built in function called DateAdd for this kind of thing,

make a new project and paste this into an event of your choice:

Dim aDate As Date
aDate = Now()
MsgBox aDate
MsgBox DateAdd("n", 5, aDate) 'Adds 5 minutes to the aDate variable

Heres a list of the possible values for Interval that i copied from msdn

String Unit of time interval to add
d Day; truncated to integral value
y Day; truncated to integral value
h Hour; truncated to integral value
n Minute; truncated to integral value
m Month; truncated to integral value
q Quarter; truncated to integral value
s Second; truncated to integral value
w Day; truncated to integral value
ww Week; truncated to integral value
yyyy Year; truncated to integral value

[Teseng]

Perfect, thanks much Arachnid.

[leinad31]

I'm trying to create a timescale, and need to add 5 minutes to a date every 10 seconds, i have a timer setup on the right interval, but i can't figure out how to add 10 minutes to a DATE variable.

Doing MyTime = MyTime + 10 just adds 10 days, i tried using 0.1 and it went wacko and displayed a seemingly random time. Any help?

0.1 is interpreted as 10% of a day which is not 10 minutes. You're probably thinking of second.millisecond precision wherein 0.1 or 10% of a second correctly converts to 100 milliseconds.

[Arachnid13]

Perfect, thanks much Arachnid.

No problem