Change Time to a number

[darinmc]

Hi
I have the simple code below to calculate the time difference.
How would I change or format the final result

1:30 TO a number 1.50

Private Sub cmdTdif_Click()
Me.Tdif = HoursAndMinutes(Me.Tout - Me.Tin)
End Sub

Thx
Darin

 

[Remou]

Why not use DateDiff:

Diff_Minutes=DateDiff(Me.Tin,Me.Tout)

 

[darinmc]

I'm getting:
DateDiff - Agument not optional

Darin

 

[Remou]

Oops.


Diff_Minutes=DateDiff("n", Me.Tin,Me.Tout)

 

[darinmc]

Thats great, now how would I convert 90 to 1.5?

Before I was getting 1:30
But i need it to read 1.5

Thx
Darin

 

[Remou]

Divide by 60.

 

[darinmc]

Thx, Didn't think it would be that easy as I thought the 90 was still in a different format...

Thx
Darin