Member Avatar for PinoyDev

Hi guys good day.

Ive create a pc time logger to detect the time-in, and to set timeout of the user. But i am having problem regarding on getting the time left value. Time out value will be the timein value plus 2 hours.Here is my code in Timer1.

dim timein,timeout,timeleft,addedtime as date
addedtime="02:00:00"

timein=format(TIME, "hh:mm:ss AM/PM")
timeout=TimeValue(timein) + TimeValue(addedtime)
timeleft=TimeValue(timeout)-Timevalue(Format(Time,"hh:mm:ss AM/PM) )

this works fine. But when timein is 11:00PM and the timeout will be 01:00AM, the time left will return 10:xx:xx which is wrong, it should return only 01:xx:xx since two hours after the login will be the time out.

Timer interval is set to 1000. Pls help guys..


Thanks for giving time & GOD bless us..

Edited by PinoyDev because: n/a
  • 2 Contributors
  • 2 Replies
  • 68 Views
  • 2 Weeks Discussion Span
  • Latest Post Latest Post by PinoyDev
Member Avatar for vb5prgrmr

Put the date in your calculations...

Good Luck

Member Avatar for PinoyDev

thank you. This problem was solved.

Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.