标题: [求助]请教获取另外程序名称 [打印本页] 作者: nagee 时间: 2005-5-6 18:15 标题: [求助]请教获取另外程序名称 请教如何把"导入"功能用VBA搬到自己做的面板上!或用VBA读取另一个程序的全部窗体与表的名称!作者: mhaibo 时间: 2005-5-6 19:35
Dim a As Object, c As Object
Dim b As String, d As String
For Each a In CurrentProject.AllForms
b = a.name & ":" & b
Next
MsgBox b '全部窗体名
For Each c In CurrentData.AllTables
d = c.name & ":" & d
Next
MsgBox d '全部表名作者: nagee 时间: 2005-5-7 21:57
谢谢!但这个好像只能获取程序自身的表名还有窗体名,我的意思是另外一个ACCESS的程序里的表名还有窗体名.像"导入"的窗体一样!作者: sgrshh29 时间: 2005-5-7 22:57