VB.MDIForm,Name,mdiDAO
,BackColor,&H8000000C&
,Caption,"DAO 3.51 Demonstation Project"
,ClientHeight,3540
,ClientLeft,1095
,ClientTop,1200
,ClientWidth,5505
,WindowState,2  'Maximized
MSComDlg.CommonDialog,Name,cdlMain
,Left,0
,Top,0
VB.Menu,Name,mnuFile
,Caption,"&File"
VB.Menu,Name,mnuFileExit
,Caption,"E&xit"
VB.Menu,Name,mnuDAO
,Caption,"&DAO Objects"
VB.Menu,Name,mnuDAOEngine
,Caption,"DB&Engine"
VB.Menu,Name,mnuDAOWorkspace
,Caption,"&Workspace"
VB.Menu,Name,mnuDAODatabase
,Caption,"&Database"
VB.Menu,Name,mnuDAOQueryDef
,Caption,"&QueryDef"
VB.Menu,Name,mnuDAOOther
,Caption,"&Other Objects"
VB.Menu,Name,mnuWindows
,Caption,"&Windows"
,WindowList,-1  'True
VB.Menu,Name,mnuWindowsItem
,Caption,"&Cascade"
,Index,0
VB.Menu,Name,mnuWindowsItem
,Caption,"Tile &Horizontal"
,Index,1
VB.Menu,Name,mnuWindowsItem
,Caption,"Tile &Vertical"
,Index,2
VB.Menu,Name,mnuWindowsItem
,Caption,"&Arrange"
,Index,3