1: 2: 3: 4: 5: 6:
' codice sotto apre la base di dati esterna Regolare il acObj = CreateObject (“Access.application„) acObj.OpenCurrentDatabase CurrentProject.Path & “\ DatabaseB.mdb„ acObj.Visible = allineano acObj.UserControl = allineano acObj.DoCmd.Maximize