Конкатское текстовое поле со строкой

приветствия для всех экспертов по доступу в этом форумеКонкатское текстовое поле со строкой

У меня возникли проблемы при попытке согласования между именем текстового поля со строкой.

В моей форме есть 10 полей ввода под названием: Student1, Student2, Student3 ... Student10

Я попытался получить значение из каждого текстового поля

Это мой код:

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

Это не работает. Ошибок нет.

Любая помощь будет оценена по достоинству.

Большое спасибо.

источник

2013-06-08 user1822457

Вы объявили 'Ā' в виде строки, а затем пытались использовать ее как целое число в цикле, и тогда вы никогда не увеличивать его. Вы прошли через свой код? – LittleBobbyTables

Увы, извините, я вставляю неправильный код. Dim A в виде строки а = 1 сделать до а = 2 MsgBox (Me.Controls ("Студент" и а) .Value) а = а + 1 петля Да, вы правы, это должно быть Integer. Теперь он работает. Огромное спасибо – user1822457

Попробуйте что-то больше, как это:

Dim i As Integer 
For i = 1 To 3 
    MsgBox Nz(Me.Controls("Student" & i).Value, "") 
Next

источник

2013-06-08 12:43:45

Hi Gord, Я пробовал, и все работает! Я искал весь день. Большое вам спасибо за помощь. – user1822457

@ user1822457: Не забудьте проголосовать за это как ответ .. – matzone

Конкатское текстовое поле со строкой

ответ

Смежные вопросы