Concat textbox name with string

Question

Hi,

greetings for all access experts in this forum 

I got problems when trying to concat between my text box name with string.
In my form there are 10 textboxs named : Student1, Student2, Student3... Student10
I tried to get value from each textbox 
This is my code :

Dim a as string
a = 1
do until a = 2
   MsgBox (Me.Controls("Student"&a).Value)
loop

It's not working. No error also.
Any help would be appreciated.
Many thanks.

Answer 1

Hi,

greetings for all access experts in this forum 

I got problems when trying to concat between my text box name with string.
In my form there are 10 textboxs named : Student1, Student2, Student3... Student10
I tried to get value from each textbox 
This is my code :

Dim a as string
a = 1
do until a = 2
   MsgBox (Me.Controls("Student"&a).Value)
loop

It's not working. No error also.
Any help would be appreciated.
Many thanks.

Hi Dwif,

First, declare a as Integer

If you use Do Until, then you have to increment the counter in the loop by yourself. For instance:

    Dim a As Integer

    a = 1
    Do Until a = 2
        MsgBox Me("Student" & a)
        a = a + 1
    Loop

Another (easier) way is:

    Dim a As Integer

    For a = 1 To 10
        MsgBox Me("Student" & a)
    Next        'Loop

Imb.

Answer 2

You should have 10 records rather than 10 textboxes!

---

Build a little, test a little

Answer 3

You should have 10 records rather than 10 textboxes!

---

Build a little, test a little

Hi Karl,

Not necessarily. For instance to make a floor plan of a student class, using an unbound form.

Imb.

Answer 4

It's works!

Many thanks Imb :)