Data Reader und Lable

  • VB.NET

Es gibt 4 Antworten in diesem Thema. Der letzte Beitrag () ist von Fabiii321.

    Data Reader und Lable

    Hallo,
    ich habe eine Frage zu einer Datenbankensache.
    Ich habe hier einen Code mit dem ich Abfragen mache.
    Doch dieser Code schreibt seine Abfrageergebnisse in ein Listview Element.
    Wie muss ich den Code umschreiben,dass die Daten jeweils in ein Lable geschrieben werden ?
    Komm einfach nicht drauf.

    Hier der Codeansatz

    VB.NET-Quellcode

    1. Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    2. Dim con As New SqlServerCe.SqlCeConnection
    3. Dim cmd As New SqlServerCe.SqlCeCommand
    4. Dim reader As SqlServerCe.SqlCeDataReader
    6. Try
    7. con.ConnectionString = "Data Source=MyDatabase#1.sdf"
    8. cmd.Connection = con
    9. cmd.CommandText = "select * from tbl_Schrauben ORDER BY Barcode DESC"
    10. con.Open()
    12. reader = cmd.ExecuteReader()
    13. lstTab.Items.Clear()
    14. reader.Read()
    15. lstTab.Items.Add(reader("Barcode") & " # " _
    16. & reader("Standort") & " # " _
    17. & reader("Länge") & " # " _
    18. & reader("Durchmesser") & " # " _
    19. & reader("Notiz"))
    22. reader.Close()
    23. con.Close()
    24. Catch ex As Exception
    25. MsgBox(ex.Message)
    26. End Try
    27. End Sub


    Vielen Dank für eure Bemühungen !!!!!!!
    Gruß
    Fabi

    Edit by ErfinderDesRades: Topic verschoben

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „ErfinderDesRades“ ()

    Wie sollen viele Datensätze, jeder mit mehreren Properties in ein einziges Label gestopft wern?
    So wie es aussieht, liest er sowieso immer nur den ersten Datensatz (While-Schleife fehlt).
    Vielleicht reicht ihm das ja schon.

    VB.NET-Quellcode

    1. MyLabel.Caption = reader("Barcode") & " # " & reader("Standort") & " # " & reader("Länge") & " # " & reader("Durchmesser") & " # " & reader("Notiz")
    --
    If Not Program.isWorking Then Code.Debug Else Code.DoNotTouch
    --

Facebook