Variablen innerhalb eines Objektnamens

Computer: Software & Programmierung Visual Basic
#1

Hi zum zweiten…

ich hoffe ihr könnt mir schnell helfen. Hier mein Problem:

Ich möchte in meinem Programm mit wenig Code viele Objekte mit dem gleichen Wert „gleichsetzen“.

Also ungefähr so:
Objekt1.Caption = Objekt2.Text

und das mit vielen anderen…

Ich würde gern eine for Schleife benutzen, in der ich eine Variable hoch zähle und diese Zahl dann im Objektnamen einsetze.

Also so:

for x = 1 to 10 step 1
objekt x .Caption = Quote3.Text
next

aber ich weiss nicht wie man es ausdrückt dass das „x“ Teil des Objektnamens ist.
Kann man das denn überhaubt so machen oder gibt es einen anderen, besseren Weg???

über schelle Anwort würde ich mich freuen…

Ich bin immernoch Anfänger, bitte berücksichtigt das. ;0)

bye Tobiii

#2

Hi zum zweiten…

ich hoffe ihr könnt mir schnell helfen. Hier mein Problem:

schau ma mal

Ich möchte in meinem Programm mit wenig Code viele Objekte mit
dem gleichen Wert „gleichsetzen“.

Also ungefähr so:
Objekt1.Caption = Objekt2.Text

ok

und das mit vielen anderen…

auch gut

Ich würde gern eine for Schleife benutzen, in der ich eine
Variable hoch zähle und diese Zahl dann im Objektnamen
einsetze.

so nicht, aber anders

Also so:

for x = 1 to 10 step 1
objekt x .Caption = Quote3.Text
next

schön wär’s

aber ich weiss nicht wie man es ausdrückt dass das „x“ Teil
des Objektnamens ist.
Kann man das denn überhaubt so machen oder gibt es einen
anderen, besseren Weg???

gibt nur einen weg, und der heißt Control-Arrays.

über schelle Anwort würde ich mich freuen…

Ich schreibe schon so schnell ich kann… Also:
Auf Deinem Form platzierst Du TextBox-Controls mit gleichem Namen und verschiedenem Index (Property). Dann schreibst Du einen Procedure zum setzten der Properties:

Private Sub SET\_CTRL1()

 Dim i As Integer

 For i = 0 To 10 'maximaler Index
 txtBox(i).Text = Irgendwas.Caption
 Next i

End Sub

Ich bin immernoch Anfänger, bitte berücksichtigt das. ;0)

bye Tobiii

Servus, Stefan.

#3

OKAY, verstanden hab ich es, aber ich kanns leider erst in den nächsten Tagen testen…

Aber danke schon mal für die schnelle Hilfe…

cu
Tobiii

#4

Versuchs damit:

  1. Deine Objekte musst Du zu einem Array machen (Property Index = 0 setzten)

  2. Hier der Code
    Dim intLoop as integer

For intLoop = 0 to Objekt1.Count - 1
Objekt1(intLoop).Caption = Objekt2(intLoop).Text
Next intLoop

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

#5

Danke Patrick, aber ich hab’s bei deinem Vorgänger schon verstanden…

trotzdem Danke

cu
Tobiii