Как прировнять имя ListBox к какой нибудь переменной?

Boo
Дата: 21.12.2011 22:06:11
Добрый день! Извеняюсь за вопрос если он уже был или не очень корректен. Но суть в следубщем. У меня есть Формы в Access, на каждой из форм есть элемент Listbox (список) со своим именем. Так вот мне надо как то выцырапать это имя и поместить в какую нибудь переменную, чтобы потом подставлять её везде.

например

List1 = 10 , где list1 это имя listbox
.
.
.
List5 = 10 , где list10 это имя listbox

Я хочу написать процедуру и в эту процедуру передавать в качестве параметра имя ListBox, и далее производить с ним манипуляции
nord-woolf
Дата: 21.12.2011 22:15:44
Boo,

Варианты:
1. Лайт. Переименовать все листбоксы к одному имени.
2. Описать в бэк модулях всех форм свойство, возвращающее ссылку на листбокс и обращаться к этому свойству извне.
3. ...
nord-woolf
Дата: 21.12.2011 22:17:01
Boo
...
Я хочу написать процедуру и в эту процедуру передавать в качестве параметра имя ListBox, и далее производить с ним манипуляции

А почему бы в процедуру не передать ссылку на листбокс?
Boo
Дата: 21.12.2011 22:31:59
А как сделать ссылку на листбокс?
mds_world
Дата: 21.12.2011 22:35:08
Boo
А как сделать ссылку на листбокс?

Forms!ИмяФормы!ИмяЛистбокса
Владимир Саныч
Дата: 21.12.2011 23:06:57
Подробности в факе, в т.ч. там есть ответ на заданный вопрос.
Akina
Дата: 21.12.2011 23:26:18
sub mysub(mylistbox as listbox)
'...
mylistbox.Clear
mylistbox.AddItem "Item1"
'...
end sub

'...
dim ctl_listbox as Listbox
'...
set ctl_listbox=me.controls("Список123")
Call mysub(ctl_listbox)
'...