Public Sub conv()
        Dim str As New System.Text.StringBuilder
        Dim lst = ListBox2
        For i As Integer = 0 To lst.Items.Count - 1
            str.AppendFormat("{0}{1}", lst.Items(i), "; ")
        Next
        strar = str.ToString()
    End Sub

? Der Computer ist die logische Weiterentwicklung des Menschen:
Intelligenz ohne Moral.?
(John Osborne, engl. Dramatiker, *1921)