Datatable Problem

  • VB.NET

    Datatable Problem

    Hallo,

    ich habe diesen Code hier:

    VB.NET-Quellcode

    1. Dim afakodok As New List(Of String)
    2. Dim lekerdezes() As DataRow
    3. dsAfakodok.Clear()
    4. dsAfakodok.ReadXml(Application.StartupPath & "\afakodok.xml")
    5. afakodok.AddRange(gvAfakodhozzarend.GetFocusedDataRow.Item(3).ToString.Split(Convert.ToChar(",")))
    6. dsAfakodeltavolit = dsAfakodok.Clone
    7. dsAfakodeltavolit.Tables.Add()
    8. For i = 0 To afakodok.Count - 1
    9. lekerdezes = dsAfakodok.Tables(0).Select("kod='" & afakodok(i) & "'")
    10. For j = 0 To lekerdezes.Count - 1
    11. dsAfakodeltavolit.Tables(0).Rows.Add(lekerdezes(j).Item(0), lekerdezes(j).Item(1), lekerdezes(j).Item(2))
    12. Next
    13. Next
    14. frmAfakodeltav.gcAfakodeltavolit.DataSource = dsAfakodeltavolit.Tables(0)
    15. frmAfakodeltav.ShowDialog()


    Was der Code macht:

    - in dsAfakodok wird ein xml eingelesen
    - in die Liste afakodok werden Codes gespeichert, z. B. A1, A2, etc
    - ich gehe dann diese Liste durch und selektiere die Zeilen in dsAfakodok, wo kod ist gleich die einzelnen Listelemente (hier wird es immer nur eine Zeile als Ergebnis geben)
    - letztendlich füge ich diese Zeile zu dsAfakodeltavolit zu

    Mein Problem ist, dass z. B. wenn die Liste afakodok 3 Elemente enthält und dementsprechend dsAfakodeltavolit.Tables(0) 3 Zeilen enthalten sollte, enthält die Tabelle immer nur eine Zeile und zwar immer die Zeile zum ersten Code (z. B. A1).

    Irgendwas missachte ich hier, aber was?

    Vielen Dank.

    EDIT: Lösung gefunden

    in der Liste sind die Werte so gespeichert worden: A1, [Leertaste]A2, etc

    ich musste nur trim aufrufen und alles klappte

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