| Forum: VB.NET |
Thema:
Re: Steuerelemente zur Laufzeit erzeugen? |
Von:
Timo Ulrich (
01.08.2005 09:41) |
Platzieren Sie auf Ihr Userinterface einen Button mit der Bezeichnung Buttonx und eine Textbox mit dem Namen Textbox1. Danach können Sie durch die Eingabe eines Integerwertes in die Textbox per Knopfdruck mehrere Buttons erstellen.
Private Sub Buttonx_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Buttonx.Click
Dim button2 As New Button
For i As Integer = 1 To CInt(TextBox1.Text)
button2.Location = New System.Drawing.Point(72, 25 * i)
button2.Size = New System.Drawing.Size(104, 23)
button2.Text = "Button" & i
Me.Controls.Add(button2)
AddHandler button2.Click, AddressOf button2_click
button2.Name = "Button" & i
Next
End Sub
Private Sub button2_click(ByVal sender As System.Object, ByVal es As System.EventArgs)
End Sub
He likes to topple those who have the farthest to fall.
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!
