Hi zusammen,
mit folgendem Code möchte ich per Klick auf einen Button jeweils eine Groupbox und eine dazugehörige Textbox erstellen.
Mit jedem weiteren Klick soll eine neue GroupBox (inkl. Textbox) etwas weiter unterhalb erstellt werden.
Jeder erste Klick erzeugt mir das gewünschte Ergebnis...also eine Groupbox mit Textbox. Bei jedem weiteren Klick wird allerdings nurnoch eine Groupbox erzeugt..die Textbox fehlt..habt ihr eine Idee wieso?
mit folgendem Code möchte ich per Klick auf einen Button jeweils eine Groupbox und eine dazugehörige Textbox erstellen.
Mit jedem weiteren Klick soll eine neue GroupBox (inkl. Textbox) etwas weiter unterhalb erstellt werden.
Jeder erste Klick erzeugt mir das gewünschte Ergebnis...also eine Groupbox mit Textbox. Bei jedem weiteren Klick wird allerdings nurnoch eine Groupbox erzeugt..die Textbox fehlt..habt ihr eine Idee wieso?
VB.NET-Quellcode
- Public Class Form1
- Dim i As Integer = 1
- Dim x As Integer = 10
- Dim j As Integer = 20
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- End Sub
- Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
- Dim Grp As GroupBox
- Dim txt As TextBox
- Grp = New GroupBox
- Controls.Add(Grp)
- Grp.Parent = Me
- Grp.Name = "grpGrp" & i
- Grp.Location = New Point(20, x)
- Grp.Size = New Size(800, 80)
- Grp.Text = i
- txt = New TextBox
- Controls.Add(txt)
- txt.Parent = Grp
- txt.Name = "txt" & i
- txt.Location = New Point(25, j)
- txt.Size = New Size(100, 50)
- txt.Text = ""
- i += 1
- x += 100
- j += 100
- End Sub
- End Class
