Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles Start2.Click
        Dim Datensatz As String
 
        For i As Integer = 0 To Liste.Items.Count - 1
            Datensatz = Debug.Print(Liste.Items(i))
          'Hierzu kommt die Meldung: Der Ausdruck ergibt keinen Wert.
 
            Label1.Text = Datensatz
 
        Next i
    End Sub

==============================================================
Hast Du kein Boolean per externer CheckBoxx,
dann konstruierst Du Dir eines: Interner Check Roxx!

Beitrag wurde zuletzt am 19.10.11 um 07:52:05 editiert.