DevTrain Startseite Visual Studio 1 Magazin  
  
  
SUCHEN:  
ARTIKEL ONLINE: 525   

Kategorien
.NET
Datenbanken
Web
XML

Allgemein
Camp
Foren
Events
Persönliche Einstellungen
Registrieren
Prämien Shop
Kontakt
Impressum
Über DevTrain

Autoren



 

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!

 Betreff:
 Nachricht: Den Beitrag finden Sie nun unter: http://beta.devtrain.de/foren Die Benutzerdaten und Foreninhalte von beta.devtrain.de und www.devtrain.de sind die selben.
Sie können sich dort sogar per RSS über neue Inhalte informieren lassen.
Bei Problemen bitte direkt Mail an asp [AT] ppedv.de.

 Signatur:

  



Login
Username:


Passwort:






Passwort vergessen?

Building und Connecting Know-how

© Copyright 2003 ppedv AG