String to timespan

Dim Seconds As Integer = TimeSpan.Parse("00:00:30").Seconds


fuente