判断adp还是mdb 的函数
tmtony
Dim intProjType As Integer intProjType = Application.CurrentProject.ProjectType Select Case intProjType Case 0 \' acNull MsgBox \" ...