как вызывать формы без указания их имени

[eugene2005]

как вызывать формы не указывая на имя форма типа secondform.show
и как сосчитать сколько форм есть в программе без предварительной загрузки всех форм

[vvs_adm]

1)

Код: Выделить всё

UnknownForm.Show

2)

Код: Выделить всё

Dim frmTemp As Form
Dim nFNum as long
For Each frmTemp In UnloadedForms
    nFNum = nFNum + 1
Next frmTemp
Msgbox nFNum


[eugene2005]

1)

Код: Выделить всё

UnknownForm.Show

2)

Код: Выделить всё

Dim frmTemp As Form
Dim nFNum as long
For Each frmTemp In UnloadedForms
    nFNum = nFNum + 1
Next frmTemp
Msgbox nFNum


а это что такое и шо оно делает?
UnknownForm.Show

[vvs_adm]

UnknownForm - неизвестная форма
.Show - метод, отображающий форму на экране.

[eugene2005]

скажем у меня 10 форм есть а если я хочу открыть номер 5 что делать тогда? forms(#).show не работает поскоку форма не была открыта до.... какой то замкнутый круг пока вижу

[GSerg]

http://bbs.vbstreets.ru/viewtopic.php?p=8027

Кто отвечает за FAQ?
Переместить топик туда.

[eugene2005]

спасибо