HI

Is it possible to set a date/time different from the
system time in the panels of the status bar. And once set
it should increment the date/time as the time moves
forward.

If there is any 3rd party product available to accomplish
this, please advice.

Thanks

vidit

It's easy enough to use a timer....
Drop a timer and a statusbar on a form and paste the following
'===========
Option Explicit

Private miDateOffset As Integer

Private Sub Form_Load()
   'add a panel to display the time in
   StatusBar1.Panels.Add , "MyTime", "", sbrText

   miDateOffset = 3 'show 3 hours later (use negative for earlier)

   Timer1.Interval = 5 'fire asap the first time through
   Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
   StatusBar1.Panels("MyTime").Text = DateAdd("h", miDateOffset, Now)
   Timer1.Interval = 750
End Sub
'===========

--
Ken Halter
MS-MVP-VB
http://www.vbsight.com
Please keep it in the groups..