Computer Programming Concepts and Visual Basic David I. Schneider

310 Computer Programming Concepts and Visual Basic
9. Click on the Left Arrow button. (This causes the next item to appear flush left
to indicate that it is a top-level menu item.)
10. Type &Size into the Caption box and type mnuSize into the Name box.
11. Click on the Next button and then click on the Right Arrow button.
12. Type 12 into the Caption box and type mnu12 into the Name box.
13. Click on the Next button.
14. Type 24 into the Caption box and type mnu24 into the Name box. Your Menu
Editor window should now appear as in Figure 10-12.
15. Click the OK button to close the Menu Editor window.
Three of the check boxes on the Menu Editor window are especially useful. When the
Checked box is checked, a checkmark appears in front of the menu item. This checkmark can
be altered in code with statements such as mnuItem.Checked = False and mnuItem.Checked
= True. When the Enable box is unchecked, the menu item appears gray and does not respond
to the click event. The enabled state can be altered in code with statements such as mnu-
Item.Enabled = False and mnuItem.Enabled = True. When the Visible property is unchecked,
the menu item is invisible.
EXAMPLE 3
The following program creates the application in Figure 10-11, in which the menu is used to alter the
appearance of the contents of a text box. The form has caption “Alter Font & Size” and the properties of
the menu items are as created before.
Private Sub mnu12_Click()
txtInfo.Font.Size = 12
End Sub
Private Sub mnu24_Click()
txtInfo.Font.Size = 24
End Sub
Private Sub mnuCourier_Click()
txtInfo.Font.Name = “Courier”
End Sub
Private Sub mnuTimesRm_Click()
txtInfo.Font.Name = “Times New Roman”
End Sub
■ THE CLIPBOARD OBJECT
The clipboard object is used to copy or move text from one location to another. It is maintained
by Windows and therefore even can be used to transfer information from one Windows application
to another. It is actually a portion of memory that holds text and has no properties
or events.
If str is a string, then the statement
Clipboard.SetText str
replaces any text currently in the clipboard with str. The statement
str = Clipboard.GetText()
assigns the text in the clipboard to the string variable str.
The statement