Oppure

Loading
04/08/09 11:32
symonx80
Ciao come posso fare per eseguire un confronto tra due ore?
Io ottengo l'ora attuale e ho necessità di capire se essa è all'interno di un intervallo o meno.
Il mio codice è questo, ma non va, entro sempre all'interno della prima condizione..

    Dim hm As Date
    
    'hm assume il valore, ad esempio, di 13.31.00 
    hm = Format(Now, "Short Time")
 
    ' ho provato pure mettendo solo (hm >= 0 And hm < 6) ma il risultato è lo stesso
    If (hm >= 0# And hm < 6#) Then
        .............
    Else
        .............
    End If


Help..
Thanx
aaa
04/08/09 12:38
antometal
anzichè 6 prova con 06.00.00 e al posto di 0 metti 00.00.00
aaa
04/08/09 12:45
theprogrammer
Dim hm As Date

hm = Now

If hm>=CDate("3/8/2009 10.00.00") And hm<=CDate("5/8/2009 11.00.00") Then
Ultima modifica effettuata da theprogrammer 04/08/09 12:51
aaa