Zitat:

rs=Username/PW;http://xxxxxxxxxxx

    Private Sub ListViewEdit()
        Dim user As String = TextBox2.Text
        Dim passwd As String = TextBox3.Text
 
        For i As Integer = 0 To ListView1.Items.Count - 1
            Dim text_to_change As String = ListView1.Items(i).Text
            Dim NewText As String = user & ":" & passwd & " / " & text_to_change
            ListView1.Items(i).Text = NewText
        Next
 
    End Sub