بدست آوردن نام فرمهای استفاده شده در پروژه

[کم حوصله]

با سلام
چه جوری میشه نام فرمهای استفاده شده در پروژه را خواند. تمام فرمها را میخواهم.
ار این روش میشه فرمهای فراخوانی شده را دید ولی فرمهای لودنشده را نمی آورد.

<code>
Dim Frm As Vb.Form
For Each Frm In Forms
Print Frm.Name
Next
<code/>

[vbhamed]

سلام

یک راه اینه که اول برنامه تو یه ماژول خودت فرم هات رو به برنامه تو یه آرایه معرفی کنی


مثالش رو برات آپلود کردم

Option Explicit

Global frm(5) As Form

Sub main()

Set frm(1) = Form1
Set frm(2) = Form2
Set frm(3) = Form3
Set frm(4) = Form4
Set frm(5) = Form5
'...
'...

Dim i%
For i = 1 To UBound(frm)
MsgBox frm(i).Name
Next

End Sub

[bkhayatian]

دوست عزیز اگر شما از MDIFORM استفاده کنی دستور جالبی در MDI هست که به راحتی میتونی فرم فعال خودت رو شناسایی کنی این دستور ACTIVEFORM هستش که فقط با MDI کار میکنه یه سری به HELP وی بی بزن اطلاعات کامل میده

مثلا اگر بخوای یک textbox رو در فرم فعالت شناسایی کنی و ازش استفاده کنی به صورت زیر مینویسی

"FORMACTIVE.TEXT1.TEXT="TEST

[vbhamed]

bkhayatian عزیز

فکر نمی کنم دوستمون فرم فعال رو خواسته باشه ها