# Re: 还是不能

Posted by Help on April 07, 1999 at 22:27:33:

In Reply to: Re: 请问:如何取得程式中所有 Form 之名称(用dir()试试看) posted by nothing on April 07, 1999 at 08:46:52:

: : : 请查vb-help 中之"forms", 即可找到解答
: : : for i to forms.count-1
: : : debug.print forms(i).name
: : : next

: : 以上之作法只能取得已经 LOAD 进来 From 之资料
: : 我的需求是包括尚未 Load(在 MDIForm 之情形) 进来所有 Form 之资料
: : 不知是否有其中方法?

: 用dir()试试看
: Private Sub Command3_Click()
: Myfile = Dir("C:\account\*.frm")

: Do While Myfile <> "" ' 执行回圈。
: MsgBox (Myfile)
: Myfile = Dir ' 寻找下一个档案。
: Loop
: End Sub

谢谢你提供之方法,但是此方式乃是取得 Form 档案之名称而非其属性之名称.

Follow Ups: