vb中获取access中的窗体属性及窗体控件属性

这两天一直被 困绕。要在vb中获access窗体的属性及窗体中控件的属性。
代码如下：

Private Sub Command1_Click()

Dim accApp As Access.Application
Set accApp = New Access.Application
accApp.Visible = False
accApp.OpenCurrentDatabase dbPath
Debug.Print accApp.CurrentProject.AllForms(0).Name
'这句成功了，获得了窗体名称
Debug.Print accApp.CurrentProject.AllForms(0).Properties(0).Name
'这句执行不了。实时错误‘2467’:您输入的表达引用了一个关闭或不存在的对象

End Sub
我认为可能是应该用 accApp.openCurrenProject dpPath,
但是提示说数据库文件已删除，或者不是有效的ADP文件
另外，也找不到获得窗体中控件属性的办法。该怎么解决？求指点

https://download.csdn.net/download/gaofei_upc/1887588

& Me.Controls("Text0").Properties(4).Name