Column eines generierten DataGridView ausblenden

  • VB.NET

Es gibt 14 Antworten in diesem Thema. Der letzte Beitrag () ist von Der_Gevatter.

    Column eines generierten DataGridView ausblenden

    Moin Forum,

    ich benötige leider Eure Hilfe / Unterstützung.

    In meinem Programm baue ich mir zur Laufzeit auf einem TabControl mehrere TabPages auf.
    Innerhalb einer TabPage baue ich mir eine DatagridView mit insgesamt 4 Spalten zusammen.
    Die erste Spalte soll ausgeblendet werden (visible = false).

    Leider steigt das Programm mit einer Fehlermeldung aus (siehe Screenshot).


    Ich komme einfach nicht weiter, um das Problem zu lösen.

    Hat Jemand einen Tipp oder Rat für mich?

    Mein Code:

    VB.NET-Quellcode

    1. Private Function NeuesTabErstellen(ByVal _parameter As CParameter) As TabPage
    2. Dim _tp As New TabPage
    3. Dim _param As New CParameter
    5. ' Name und Text des Tabs bestimmen
    6. Dim _anzahlTabs As Integer = TabParameter.TabCount + 1
    7. _tp.Name = "TabParam" + _anzahlTabs.ToString
    8. _tp.Text = "Parameter" + _anzahlTabs.ToString
    9. _tp.BorderStyle = BorderStyle.FixedSingle
    10. _tp.Tag = _param
    12. ' datatable
    13. Dim _dtParameter As New DataTable
    14. _dtParameter.Columns.Add("ParameterWert", GetType(CParameterwert))
    15. _dtParameter.Columns.Add("Nr", GetType(Integer))
    16. _dtParameter.Columns.Add("Bezeichnung", GetType(String))
    17. _dtParameter.Columns.Add("Wert", GetType(String))
    19. If _parameter IsNot Nothing Then
    20. ' Tabelle mit Leben füllen
    21. For Each _parameterwert As CParameterwert In _parameter.ParameterWerte
    22. _dtParameter.Rows.Add(_parameterwert, _parameterwert.Parameter_Nr, _parameterwert.Bezeichnung, _parameterwert.Wert)
    23. Next
    24. End If
    26. ' Datagridview aufbauen
    27. Dim _dgv As New DataGridView
    28. With _dgv
    29. .AllowUserToOrderColumns = True
    30. .AllowUserToResizeColumns = True
    31. .AllowUserToResizeRows = False
    32. .AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.Fill
    33. .Dock = DockStyle.Fill
    34. .RowHeadersVisible = False
    35. .ReadOnly = False
    36. .SelectionMode = DataGridViewSelectionMode.FullRowSelect
    37. .DataSource = _dtParameter
    39. .Columns("ParameterWert").Visible = False
    40. End With
    42. _tp.Controls.Add(_dgv)
    44. Return _tp
    45. End Function

    @Der_Gevatter Die Spalte, die Du ansprichst, gibt es nicht.
    Hast Du den Namen richtig geschrieben?
    Hast Du diese Apalte bereits vorher gelöscht?
    Probierma, diese Spalte über ihren Index anzusprechen.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    @Der_Gevatter OK, dann musst Du mal selbst rauskriegen, was da wirklich Nothing ist.
    Lerne zu debuggen:
    Debuggen, Fehler finden und beseitigen
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Na Moment. Irgendwie werde ich das Gefühl nicht los, dass die DataTable zwar die Column enthält, das DGV aber noch nicht. Ich glaube, dass man das nicht in einem Atemzug (= in einer synchronen Prozedur) machen kann. Aber ausprobiert habe ich es nicht.
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.

    Die Schuppen und die Augen:

    Der_Gevatter schrieb:

    VB.NET-Quellcode

    1. Dim _dgv As New DataGridView
    Also:
    Dieses DGV enthält gar keine eigene Spalte, sondern nur eine DataTable als DataSource.
    Ich werde das mal nachstellen:
    _dgv.Columns.Count ist bei mir 0.
    ====
    Mit einer einfachen Tabelle ohne CParameter und CParameterwert funktioniert das.
    Form mit DGV und zwei Buttons:
    Spoiler anzeigen

    VB.NET-Quellcode

    1. Public Class Form1
    2. Private MyTable As DataTable
    4. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    5. Me.MyTable = Me.InitDataTable()
    6. Me.InitData()
    7. End Sub
    9. Private Function InitDataTable() As DataTable
    10. Dim table = New DataTable("Sinus")
    11. ' für das DGV
    12. table.Columns.Add(New DataColumn("Coordinate", GetType(Double)))
    13. table.Columns.Add(New DataColumn("Value", GetType(Double)))
    14. Return table
    15. End Function
    16. Private Sub InitData()
    17. ' DataSource löschen
    18. Me.MyTable.Clear()
    19. Me.DataGridView1.DataSource = Nothing
    20. End Sub
    22. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    23. ' Hier werden die Daten bereitgestellt:
    24. Me.MyTable.Clear()
    25. For i As Integer = 0 To 100
    26. Dim newRow As DataRow = Me.MyTable.NewRow()
    27. newRow(0) = i
    28. newRow(1) = Math.Sin(i / 10)
    29. Me.MyTable.Rows.Add(newRow)
    30. Next
    32. Me.DataGridView1.DataSource = Me.MyTable
    33. Me.DataGridView1.Columns(1).DefaultCellStyle.Format = "0.0000"
    34. End Sub
    36. Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
    37. Me.DataGridView1.Columns(1).Visible = Not Me.DataGridView1.Columns(1).Visible
    38. End Sub
    39. End Class


    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

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

    Durch die Zuordnung der DataTable werden welche generiert. Aber wahrscheinlich nicht rechtzeitig.
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.

    VaporiZed schrieb:

    Aber wahrscheinlich nicht rechtzeitig.
    Das hatte ich auch vermutet und das Ausblenden nach Außerhalb des With-Blockes verschoben.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    @RodFromGermany

    soweit war ich auch schon.
    wenn das DataViewGrid auf die Form bzw. in das Tab gezeichnet wird, klappt alles bestens.

    Allerdings weiß ich erst zur Laufzeit des Programms, wie viele TabPages benötigt werden und daher erzeuge ich auch das DataGridView erst zur Laufzeit.
    Das Ausblenden nach dem With Block brachte leider auch nichts.

    Wenn ich die einzelnen Columns des DataGridViews "per Hand" erstelle, komme ich an dem Punkt nicht weiter, dass ich für CParameterwert kein DataGridViewColumn erstellen kann.

    @Der_Gevatter erstell mal ein UserControl mit DGV und füll das nur aus, und weise dessen Instanz der neuen TabPage zu.
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

    Das DGV muss erst dem Form als Control hinzugefügt werden, dadurch werden erst die Spalten tatsächlich erstellt, danach kann man auf diese zugreifen. Also: Post#1: Zeile#39 nach der #42 platzieren, allerdings eben vollqualifiziert.
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.

    Na Moment. _tp ist laut Post#1 und implizit bei Dir ja auch erst eine TabPage im Entstehen. Ich rede ja von zum-bereits-existierenden-und-angezeigten-Form-hinzufügen. Und das geht dann bei mir.
    Dieser Beitrag wurde bereits 5 mal editiert, zuletzt von „VaporiZed“, mal wieder aus Grammatikgründen.

    Aufgrund spontaner Selbsteintrübung sind all meine Glaskugeln beim Hersteller. Lasst mich daher bitte nicht den Spekulatiusbackmodus wechseln.

    @VaporiZed Jou, nun schnackelt es.
    Spoiler anzeigen

    VB.NET-Quellcode

    1. Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
    2. Dim cp = New CParameter
    3. With cp
    4. .ParameterWerte = New List(Of CParameterwert)
    5. Dim wert1 = New CParameterwert
    6. Dim wert2 = New CParameterwert
    7. .ParameterWerte.Add(wert1)
    8. .ParameterWerte.Add(wert2)
    9. End With
    10. Me.TabControl1.TabPages.Add(NeuesTabErstellen(cp))
    12. Dim _dgv As DataGridView = CType(Me.TabControl1.TabPages(2).Controls("bla"), DataGridView)
    13. _dgv.Columns("ParameterWert").Visible = False
    14. '_dgv.Columns(0).Visible = False
    15. End Sub
    Falls Du diesen Code kopierst, achte auf die C&P-Bremse.
    Jede einzelne Zeile Deines Programms, die Du nicht explizit getestet hast, ist falsch :!:
    Ein guter .NET-Snippetkonverter (der ist verfügbar).
    Programmierfragen über PN / Konversation werden ignoriert!

Facebook
Telefonspende