2013-04-12 4 views
0

У меня есть проект с большим количеством элементов управления формой (например, 3 сотни меток), и я должен изменить все их тексты.Visual Basic - Управление элементами различной формы

Так что я хочу сделать что-то вроде этого

For i= 1 to 300 
(Labeli).text = "xyz" 
Next 

Я не могу писать и изменять все метки один за другим, так что я нужен способ, чтобы изменить любую метку, используя номер + «Метка» поэтому он становится «Labeli».

Извините за мой английский, я жду вашей помощи, спасибо :)

ответ

2

Что-то, как это должно работать для вас:

For i = 1 to 300 
    CType(Me.Controls("Label" & i), Label).Text = "xyz" 
Next 

Вам нужно будет добавить рекурсии или придавить элементы управления на этикетке, если вы их вложили.

+0

Me.Controls ("Label" & i) вот что я искал благодаря :) – Nanoripper

+0

@ user1180503: Без проблем. Я удалил другой образец кода. Не забудьте принять. – Neolisk