ASP.NET (VB) ขอถามเรื่องการตัดสตริงนะค่ะ ถ้ามีข้อความอยู่แล้วมีตัว : คั่น เราจะตัดสตริงเอาแต่ละชุดออกมายังงัยค่ะ

Dim user As String
        Dim iRow As Integer
        Dim var As New ArrayList
        Dim msg As String
        user = "aaa bbb : cccc : ddddd : eeee uuuu : gggggg"

        iRow = user.IndexOf(" : ")
        While iRow > 0
            var.Add(Trim(Mid(user, 1, iRow)))
            user = Trim(Mid(user, iRow + 3))
            iRow = user.IndexOf(" : ")
            If iRow = -1 Then var.Add(Trim(user))

        End While

        For iRow = 0 To var.Count - 1
            msg &= var.Item(iRow) & vbLf
        Next

        MessageBox.Show(msg)