Hejsan. Jag skulle behöva lite info på hur man fixar med TID och sånt i vb. Jag föredrar att se Tid(klocka) matematiskt. ooo... såg inte att det fanns ett nybörjar forum... jag är nybörjare och hajar inte vad du pratar om ;) Sven, enheten i ditt tidsystem är alltså ett dygn. Dag noll(0) är 1900-01-01 Idag just nu i skrivande stund så är det såTid och sånt i VB
Jag ska alltså slumpa tio olika tider mellan två bestämda värden. Sedan plussa ihop dessa med 10 nya tider. Hur går jag tillväga?Sv: Tid och sånt i VB
Då är det så här att du kan uttrycka alla tider som ett decimal tal.
00:00:00 - 23:59:59 blir 0,0 - 0,99999
Av detta följer 1 sek kan uttryckas som 0.99999/86400=0.000011574
1 min " 0.99999/1440 = 0.000694438
1 tim 0.99999/24 = 0.041666250
För att då kolla detta kan Ni "progga"
<code>
MsgBox Format$(0.99999/1440 * 10 ,"hh:mm:ss") 'kommer att visa 10 min osv osv.
</code>
I dit fall så kör du Random mellan det space du vill ha av det ovan skrivna.
Eftersom du inte skriver i NybörjareForumet så fixar du det.Sv: Tid och sånt i VB
Sv: Tid och sånt i VB
Ett sådant system har ju förmågan att rymma hela
kalendern, om man bestämmer en viss dag till noll.
Vilken dag använder du isåfall som noll? Sv: Tid och sånt i VB
här efter denna matte. 37953.6729861.
<code>
Dim Nu As Double
Nu = Now
MsgBox Nu
</code>
Där heltalsdelen 37953 är antal dagar sedan 1900-01-01
Klockan är decimaldelen 0.6729861 enl resonemang ovan.
Du kan också räkna dagar före 1900 genom att sätta -(minus framför) ex
den 6 nov 1632 kl 1200 kan skrivas -97573.5
<code>
MsgBox Format$(-97573.5,"yyyy-mm-dd")
</code>