VB - How to Split string

Private Sub Split_String_JobReq()
        Dim s As String = LBLAITREQ.Text
        Dim words As String() = s.Split(New Char() {"."})
        s = ""
        Dim word As String
        For Each word In words
            s = s + "<br>&radic; " + word + "<br><br>"
        Next
        LBLAITREQ.Text = s

    End Sub