Also wenn ich deine Frage richtig verstanden habe, dann solltes da die Lösung sein.

Code:
For Each Text As String In ComboBox1.Items
    Dim werte As String() = Text.Split(":")

    MessageBox.Show(werte(0) & " - " & werte(1))
Next
MfG, Sawyer