Calculate Time differance in label

For starters, using TIME vs. Timer:

    Dim TimeIs  As Date, _
        StopTime    As Date, _
        TimeZero    As Date

    TimeZero = Time

'some other stuff between the start and stop times...

    StopTime = Time
    TimeIs = StopTime - TimeZero
    UserForm1.Label1.Caption = TimeIs
    UserForm1.Show