powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Использование функции
10 сообщений из 10, страница 1 из 1
Использование функции
    #35436431
profts
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Никак не могу разобраться со следующим.
Есть форма со множеством полей и кнопок. При нажатии определенной кнопки переменным должны присваиваться значения полей с таким же индексом как и у кнопки.

Допустип при нажатии button_1

a = pole1_1
b = pole2_1
c = pole3_1
d = pole4_1

Никак не могу создать функцию, где индекс кнопки будет аргументом. (function aaa (index as string)

Если в теле функции потом пишу:
a = "pole1" & index , то присваивается строка, а не значение данного поля.
Никак не могу это обойти
...
Рейтинг: 0 / 0
Использование функции
    #35436862
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Private Sub Command1_Click(Index As Integer)
Dim a
a = Text1(Index)
MsgBox a
End Sub

Вы создали массивы контролей? Вы говорите об индексах, но из вашего кода это не следует. И что вот это?

index as string

С каких пор индексы контролей стали строковыми переменными?
...
Рейтинг: 0 / 0
Использование функции
    #35437083
profts
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
index - название аргумента. может быть _1, _2 и т.д. Поэтому String.
Переделал как у Вас, "Text1(index) воспринимает как функцию и выдает Sub or Function not defined
...
Рейтинг: 0 / 0
Использование функции
    #35437113
Фотография Игорь Горбонос
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Автор: profts
> index - название аргумента. может быть _1, _2 и т.д. Поэтому String.
> Переделал как у Вас, "Text1(index) воспринимает как функцию и выдает
> Sub or Function not defined

а вопрос:
VladConnВы создали массивы контролей? Вы говорите об индексах, но из
вашего кода это не следует.

кому адресован??

Подразумевается, что у Вас есть массив елементов управления Text1(), который
создается вставкой одноименного контрола на форму и на вопрос среды о
создании массива контролов дать положительный ответ.(как вариант)

--
С уважением Горбонос Игорь Леонидович

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
Использование функции
    #35437125
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В вашем коде индекс никакой не индекс, а часть имени переменной.

Почитайте, как создаются массивы контролей. Это где-то в первом параграфе любого учебника по VB для начинающих.

Успехов
...
Рейтинг: 0 / 0
Использование функции
    #35437183
profts
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Честно говоря не знаю что такое массив контролей и даже не думал что он в этом случае нужен (пару книжек уже просмотрел - ничего не нашел).

У меня есть несколько кнопок с названиями типа: button1_1, button1_2, button1_3 и т.д.
Каждой кнопке соответсвуют несколько полей:
pole1_1
pole2_1
...
pole1_1
pole2_1
...
pole1_1
pole2_1
...

Я думал можно синтаксически обойти этот момент.
ведь если просто пишу "a = pole1_1" - присваивается значение поля "pole1_1" в форме
еслиже делаю через функцию как писал выше - присваивается строка "pole1_1"
...
Рейтинг: 0 / 0
Использование функции
    #35437186
profts
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
>В вашем коде индекс никакой не индекс, а часть имени переменной.

Точнее будет сказать - часть названия поля.
...
Рейтинг: 0 / 0
Использование функции
    #35437196
profts
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
будем искать
...
Рейтинг: 0 / 0
Использование функции
    #35437229
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот название, а имя...
...
Рейтинг: 0 / 0
Использование функции
    #35437305
Фотография VladConn
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не название, не прозвище, не кличка, а имя.
...
Рейтинг: 0 / 0
10 сообщений из 10, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Использование функции
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]