[Gambas-user] Time Help

[Laurent Carlier]

Le Lundi 13 Juin 2005 03:28, Michael Murphy a écrit :

A way to do but limited to 23:59:59 :)

--
' Gambas class file

start AS Date

PUBLIC SUB _new()

  start = Now
  Timer1.Enabled = TRUE

END

PUBLIC SUB Timer1_Timer()

  DIM calc AS Date

  calc = Now - start
  TextBox1.Text = Hour(calc) & ":" & Minute(calc) & ":" & Second(calc)

END
-- 

Laurent Carlier
jabber : LordHeavy at ...943...