| |
|
|
| | можно получить так
Set frm = New Form_MyForm
|
Вопрос: можно ли получить используя в качестве аргумента имя формы? | |
| |
| |
| |
 31 Кб. |
|
| | Видел два решения:
1. Через функцию с Select case strFormName, недостатки - надо заранее прописывать все нужные имена форм в Case - ах функции.
2. В каждой форме есть публичный метод/свойство - создающий новый экземпляр класса формы и возвращающий ссылку на него. В общей функции смотрим, если форма открыта, вызываем метод, если закрыта - сначала открываем в тени, вызываем метод, закрываем. См. прицеп. | |
| |
| |
| |
|
|
| |
Select case strFormName, недостатки
|
= достали недостатки 
поковыряюсь по п.2
спасибки | |
| |
| |
| |
|
|
| | Можно так-же:
1. Комбинировать варианты 1 и 2.
2. Написать библиотечную функцию, которая создает/правит функцию варианта 1, просматривая коллекцию форм.
Конечно это все "полумеры", но других вариантов пока не встречал.  | |
| |
| |
| |
|
|
| |
Конечно это все "полумеры", но других вариантов пока не встречал.
|
- Точно, полумеры
Если "в лоб " не получается, тогда оставлю селект
 | |
| |
| |
