Control Screen Menu Design
We have seen in the earlier topic on Control Screen Design that we can display several Menus at one place. Let us look into a simple design with 2 Menus and how they can be displayed at the same place interchangeably. We need two Tables, one for Data Files List and another one for Reports’ List. You can use the same Table that we have created for the Opening Access Forms topic. Make a copy of it and rename it as ReportList.
- Open a New Form in design View.
- Click on the Tab Control Button on the Toolbox and draw a Tab Control on the new form’s detail section as shown below:
- Click on the second page of the tab control where page2 is shown and display the property sheet. Type Reports in the Caption Property.
- Click on Page1 and Type Data Files in the Caption Property.
- Now we need to create a List Box. Before clicking on the Listbox button on the Toolbox ensure that the Control Wizard (the button next to the arrow button) is selected on the Toolbox.
- When you point the arrow on the Tab control Page, after selecting the listbox control, the Tab Control Page will highlight with a black background where you can position your listbox. Draw a Listbox with the size of your choice.
- The Listbox Wizard starts up. Select the Data Files Table and select Seq & Desc Fields from the Table and click Next. Select Seq field for sorting in Ascending Order and click Finish.
We needs to re-organize the Listbox and the Tab Control as its size and placement have changed. Select the child label of the listbox and delete it. Click outside the Tab Control and drag the mouse over it (or click on right of the tab-page projections, right of page2) to select the Tab Control and drag it towards right, giving enough space at left side for creating Command Buttons later, if its position was changed too close to the left border. Change the Listbox’s size to your liking.
We are concentrating only on the designing aspect of the controls not running its options from the listbox, which we have already discussed under the topic Opening Access Forms.
- Click on the Listbox and display its Property Sheet. Note down the following Property Values:
We need to create a 2nd Listbox on 2nd Page of the Tab Control. Instead of going through the wizard method we will do it differently.
- Right-click on the Listbox on first page and select copy from the shortcut menu.
- Click on the 2nd Page (Reports) tab to select it, press and hold the Shift Key then right-click on the tab page and select paste from the short cut menu. The List box from the first page is copied to the 2nd page. To change its Row Source, display the property sheet and click on the Row source property and select the build (. . .) button at the right side. The Query Design window is On with the DataFiles Table in it. Click on the Show Table Button on the Tool Bar above and select the ReportList Table. Change the Fields and the Table Names in place of Datafiles table to ReportList Table and Fields. Delete the Datafiles table from the design and close the window to save the changes.
- Display the Property Sheet of the Listbox of 2nd Page, if it is not already visible, and change the values of the above properties (Top, Left, Width & Height) to the same value that we have noted down from first page. Change the Fill Color and the Font Color to something different like blue background and white font color.
- Select the tab control using one of the methods explained under item 7 (2nd paragraph text in bold italics) above and display the property sheet. Change the following Property values:
- Name = TabCtl0 (Zero at the end)
- Back Style = Transparent
- Multirow = No (default)
- Style = Buttons
- Save the Form and open it in Form View. Because of the above property change you can hardly say it is a Tab Control. Click on the buttons on the top one after the other to display the Data Files & Report Menus and we can see both the menus are sharing the same space for displaying their contents.
- If you don’t like the Buttons on the top, create two Command Buttons at the left side, one below the other. Name the First one as cmdDF and change its Caption to Data Files. Name the second Button as cmdRpt and change its Caption to Reports.
- Select the first Command Button and display the Property Sheet. Add a line of code in the On Click Event Procedure:
Private Sub cmdDF_Click() Me.TabCtl0.Pages(0).SetFocus End Sub
Write the following code in the On Click Event Procedure of the 2nd Command Button:
Private Sub cmdRpt_Click() Me.TabCtl0.Pages(1).SetFocus End Sub
We need to make one more change on the Tab Control’s Style Property Value = None
to make the top Buttons to disappear and then save the Form. Open it in Form view and try out your design.
If you need more menus, you can add more Tab Control Pages from the Insert Menu after selecting the Tab Control. Repeat the design process with Listboxes and Command Buttons as explained above.