Writing a Procedure to Populate the List Box Control

In the preceding section, you prepared the ListHardware procedure to populate the lboxSystems list box with the Hardware items. You can use the same method to load the Software items into the list box.

1. Activate the ShowSurvey module and enter the code of the ListSoftware procedure, as shown below:

Sub ListSoftware()

With InfoSurvey.lboxSystemy .AddItem "Spreadsheets" .AddItem "Databases" .AddItem "CAD Systems" .AddItem "Word Processing" .AddItem "Finance Programs" .AddItem "Games" .AddItem "Accounting Programs" .AddItem "Desktop Publishing" .AddItem "Imaging Software" .AddItem "Personal Information Managers" End With End Sub

0 -1

Post a comment