Hello,

I tried this code:


Public Sub Form_Open()
  
  Dim i As Integer
  
    For i = 1 To 24
  
       Print Time(0, 0, 3600 * i), 3600 * i
  
    Next
  
End


and here its results :

01:00:00        3600
02:00:00        7200
03:00:00        10800
04:00:00        14400
05:00:00        18000
06:00:00        21600
07:00:00        25200
08:00:00        28800
09:00:00        32400
15:47:44        36000
16:47:44        39600
17:47:44        43200
18:47:44        46800
19:47:44        50400
20:47:44        54000
21:47:44        57600
22:47:44        61200
23:47:44        64800
00:47:44        68400
01:47:44        72000
02:47:44        75600
03:47:44        79200
04:47:44        82800
05:47:44        86400


......Do not it seem to you that there is something strange in the results?   
:-O

Regards

vuott

------------------------------------------------------------------------------
How ServiceNow helps IT people transform IT departments:
1. Consolidate legacy IT systems to a single system of record for IT
2. Standardize and globalize service processes across IT
3. Implement zero-touch automation to replace manual, redundant tasks
http://pubads.g.doubleclick.net/gampad/clk?id=51271111&iu=/4140/ostg.clktrk
_______________________________________________
Gambas-user mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to