时段里面,保存的是(秒数),你把时间转换成秒即可,比如
Dim str As String = "07:43:11"Dim d As Date = strDim i As Double = d.Hour * 3600 + d.Minute * 60 + d.Secondmsgbox(i)