Office中国论坛/Access中国论坛

标题: 如何得到一打开所有Form的名字？ [打印本页]

作者: kiko 时间: 2002-9-27 22:41
标题: 如何得到一打开所有Form的名字？
包括form,report form
还有Visible=false

作者: kiko 时间: 2002-9-28 00:15
我会了

Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentProject
For Each obj In dbs.AllForms
      If obj.IsLoaded = True Then
         Debug.Print obj.Name
      End If
Next obj

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)