1: 2: 3: 4: 5: 6:
' Code opent hieronder het externe gegevensbestand Reeks acObj = CreateObject („Access.application“) acObj.OpenCurrentDatabase CurrentProject.Path & „\ DatabaseB.mdb“ acObj.Visible = Waar acObj.UserControl = Waar acObj.DoCmd.Maximize