ComboxBox in GroupBox adden

  • VB.NET

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

    ComboxBox in GroupBox adden

    Haii Leute,

    ich möchte gerne in einer GroupBox eine ComboBox adden. Diese ist, wie man nachstehendem Code entnehmen kann, in der Größe von dem Inhalt abhängig. Leider bekomme ich es nicht so recht hin, die ComboBox in meiner GroupBox zu adden.

    :)

    Mein bisheriger Code

    VB.NET-Quellcode

    1. Dim cb As New ComboBox
    2. cb.Location = New Point(62, 13) : cb.Height = 13
    3. cb.FlatStyle = FlatStyle.Popup : cb.DropDownStyle = ComboBoxStyle.DropDownList
    4. cb.Items.AddRange(New String() {"", "Anlegen", "Folgevorgang", "Löschen / Sperren", "Neuzuordnung"})
    5. Me.Controls.Add(cb)
    6. Dim g As Graphics = cb.CreateGraphics()
    7. Dim Breite, MaxBreite As Single
    8. For Each Element In cb.Items
    9. Breite = g.MeasureString(Element.ToString, cb.Font).Width
    10. If Breite > MaxBreite Then MaxBreite = Breite
    11. Next
    12. cb.Width = CInt(MaxBreite) + 20
    Schreib mal diese Zeile als letzte hin:

    VB.NET-Quellcode

    1. Me.Controls.Add(cb)
    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!
    Sorry.

    VB.NET-Quellcode

    1. Me.GroupBox1.Controls.Add(cb)
    oder so
    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!