✔ Fortlaufend nummerierte Labels ansprechen

[NeMeSiS1987]

Hallo,

ich habe in einem Formular Labels, die id1, id2, id3,...., id10 heißen.
Diesen will ich Werte zuweisen. Geht das in einer Schleife oder muss ich jedes einzeln ansprechen?

For i = 1 To 10
        id  + CStr(i) + .Caption = i
    Next

Ich weiß dass es so nicht geht, der Code dient nur zur Verdeutlichung.

 

[Alex F.]

versuch es mal mit

me.Controls("ID" & i ).Caption = i

wobei es eigentlich schöner wäre diese in einem Controlarray zu haben dann hättest du sie über den Index ansprechen können.

ID(i).Caption = i

Grüsse bb

 

[NeMeSiS1987]

Danke, funktioniert mit der ersten Variante.

 

[NeMeSiS1987]

Aber wie kann ich jetzt auf die gleiche Weise etwas auslesen?

For i = 1 To 10
    rs.MoveLast
    rs.AddNew
    rs!port = Me.Controls("port" & i).Caption
    rs.Update
    Next

So gehts nicht...

 

[Alex F.]

Doch wenn du die richtige eigenschaft ansprichst

es müsste die .text oder die .value statt Caption sein

Grüsse bb

 

[NeMeSiS1987]

Danke, hattest mal wieder Recht.

mfG NeMeSiS