DevTrain Forum - AW: AW: AW: VB2005: For.... Each

Forum: VB.NET | Thema: AW: AW: AW: VB2005: For.... Each | Von: Thomas Golla ( 04.08.2006 10:17)

		Hallo Sandra,

schau dir das mal an.

Nicht schön aber so könnte man es machen :-)




Dim tbarray As TextBox()

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 For i As Int16 = 0 To 9
  ReDim Preserve tbarray(i)
  Dim tb As New TextBox
  tb.Top = i * 20
  tb.Height = 20
  tb.Width = 100
  tb.Text = i.ToString
  tbarray(i) = tb
  Me.Controls.Add(tb)
 Next

 Dim bt As New Button
 bt.Top = 0
 bt.Left = 120
 bt.Width = 100
 bt.Text = "Drück mich :-)"
 Me.Controls.Add(bt)
 AddHandler bt.Click, AddressOf Button1_Click
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
 tbarray(5).Text = "Hossa"
End Sub

LG
Tom


	

Betreff Von Datum

AW: AW: AW: AW: VB2005: For.... Each

hi tom,<br><br>klar, gehen tut's... aber ist das sinnvoll? will jetzt nicht sagen das es unsinnig ist, aber ich zumindest brauche sprechendere Namen als ich sie mit einem Array bekommen kann....

Sandra Hug 04.08.2006 10:47

AW: AW: AW: AW: AW: VB2005: For.... Each

Weils mich interessiert: <br><br>Was willst du da eigentlich anstellen? Wenn du deine Textboxen im Code erzeugst gibts ja sowieso eine Datenquelle dafür oder? Oder wird dies anhand von Userangaben...

Bernhard Grojer 04.08.2006 11:25

Antworten Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!