7. První příkaz v nabídce je vlastně dvouhodnotový přepínač, který má měnit stav zaškrtávacího políčka.
Protože má být výchozí stav „zaškrtnuté“, nastavte vlastnost Checked prvku cmnuItemZvuky
na True.
8. Chcete-li některým prvkům v nabídce přiřadit klávesovou zkratku, nastavte jejich vlastnost Short-
Cut. Klepněte vpravo od vlastnosti v okně Properties a kombinaci kláves vyberte z dostupných
možností v rozvíracím seznamu. Zda bude klávesová zkratka zobrazena jako součást textu nabídky
určíte hodnotou vlastnosti ShowShortCut.
9. Než začnete prvkům nabídek přiřazovat činnosti, bývá vhodné vyzkoušet prázdný návrh. Spusťte
aplikaci a klepněte pravým tlačítkem myši na zobrazeném formuláři. Uvidíte místní nabídku podobnou
té, která je zobrazena vlevo dole.
Klepnete-li pravým tlačítkem myši na některém textovém poli, zobrazí se ale výchozí místní nabídka
s příkazy pro práci se schránkou. Také textová pole mají totiž vlastnost ContextMenu a pokud ji explicitně
nenastavíte, mají výchozí hodnotu (none).
10. Napište událostní procedury Click jednotlivých prvků nabídek. Například pro zapnutí/vypnutí
efektů:
Public Sub cmnuItemZvuky_Click(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles cmnuItemZvuky.Click
chkCingrlátka.checked = Not chkCingrlátka.checked
End Sub
nebo pro tlačítko Pokračovat:
Public Sub cmnuPokračovat_Click(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles cmnuPokračovat.Click
btnPokračovat_Click(sender, e)
End Sub