How to Convert Seconds from sum of Hour.

Dim TotalTime As String
Dim TimeParts() As String
Dim Hours As Long
Dim Minutes As Long
Dim Seconds As Long

TotalTime = "250:35"
TimeParts = Split(TotalTime, ":")
Hours = CInt(TimeParts(0))
Minutes = CInt(TimeParts(1))

Seconds = (Hours * 3600) + (Minutes * 60)