[VB6] Calcolo sottrazione con orari

[oregon]

Semplicemente

    Dim p As Date
    Dim a As Date
    
    p = CDate("04/12/2006 8:00:00")
    a = CDate("05/12/2006 16:00:00")
    
    Print DateDiff("h", p, a) & " ore"

P.S. Non scrivere in tutti i forum ... per VB va bene questo ...