hi. ich möchte ganz einfach meine labels mit informationen füllen. ich habe eine varibale namens "loopcount" und habe jede menge labels. ich möchte dass, das etwa so aussieht

Quellcode:label & loopcount & .text = blax so geht es nicht. wie muss ich es schreiben damit das funktioniert. oder welche möglichkeit habe ich noch, auser 100 if abfragen zu machen

Quellcode:if loopcount = 1 then label1.text = bla1
elseif loopcount = 2 then label2.text = bla2 und so weiter

sw_a_t heißt jetzt CPoly !

Medieval Battles - Para Bella Crudelia

Wenn du den Labels den selben Namen gibst, macht er afair ein array daraus... Eine andere Möglichkeit ist eine Funktion auf dem Fenster, die eine Komponente mit einem bestimmten Namen sucht... Weiss nur nicht mehr, wie die Funktion geheissen hat...

entweder:

Dim i as Integer
For i = 0 to 99
txt(i).Text = "bla"
next i

Hierfür musst du, wie Superhausi schon erwähnt hat, ein Array aus den Textfeldern machen. Geht ganz einfach: du bennenst 2 Textboxen gleich, dann kommt eine Meldung, ob du ein Steuerelementenfeld erzeugen willst. Die Eigenschaft Index für jedes neue, gleichnamiges Textgeld wird dann immer um 1 erhöht.

oder:

Dim ctrl As Control
For Each ctrl In frmMain.Controls
If TypeOf ctrl Is TextBox And ctrl.Name = "txt" Then
ctrl.Text = "bla"
End If
Next ctrl

Ich sehe einen Mann im Feuer hocken;
er lässt mich kalt, und ich frage mich,
was macht er hier so kühn
in meinem Scheiterhaufen ...