VPF::Обращение к label через переменнные.

Jr13san

Дата 5.5.2009, 09:23 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 174
Регистрация: 29.7.2008
Где: г. Павлово

Репутация: нет
Всего: нет

Привет всем, кто на форуме.
У меня возникла проблемка с лейблами...
Вобщем всё тут:

Установите на форме 2 label и Commandbutton(всё по стандарту)

Код:

Код


Private Function NL(ByVal n As Integer) As Label
Set NL = "Label" & n
End Function

Private Sub Command1_Click()
NL(1).Caption = "Hey"
End Sub

Проблема вся в том, что мне нужно обратиться к label1 или label2 не по именам, а через переменные...
Кто знает как - помогите.

Akina

Дата 5.5.2009, 09:48 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

Jr13san, вы не первый день в кодинге - может, пора перестать делать детские ошибки?

Код


Private Function NL(ByVal n As Integer) As Label
Set NL = Me.Controls("Label" & CStr(n))
End Function

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

Jr13san

Дата 5.5.2009, 14:07 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 174
Регистрация: 29.7.2008
Где: г. Павлово

Репутация: нет
Всего: нет

я попробую..

Jr13san

Дата 18.5.2009, 07:32 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 174
Регистрация: 29.7.2008
Где: г. Павлово

Репутация: нет
Всего: нет

Akina, Спасибо! Всё работает.
Теперь буду знать.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »