Imports System

Imports System.Collections.Generic

​

Public Module Module1

​

    Public Sub Main()

        Dim myComboBox As New List(Of String)

        myComboBox.Add("12:00:00 AM")

        myComboBox.Add("1:00:00 AM")

        myComboBox.Add("2:00:00 AM")

        myComboBox.Add("3:00:00 AM")

​

        Dim myComboBox2 As New List(Of String)

        myComboBox2.Add("12:00:00 AM")

        myComboBox2.Add("1:00:00 AM")

        myComboBox2.Add("2:00:00 AM")

        myComboBox2.Add("3:00:00 AM")

        Dim myTimeStart As DateTime = DateTime.Parse(myComboBox(2))

        Dim myTimeEnd As DateTime = DateTime.Parse(myComboBox2(3))

        Dim myTimeSpan = myTimeEnd.Subtract(myTimeStart)

        Console.WriteLine(myTimeSpan)

    End Sub

End Module

​