I denne artikel vil jeg komme lidt ind på, hvordan man opretter menuer i VB.
der vil ikke komme så meget kode, da den er den samme, men måden og metoden man skal gøre det på vil jeg her prøve at redegøre for.
Her vil der kum komme den basiske opsætning af menuer.
Jeg bruger selv Visual Basic 6.0 Enterprise Edition, men editoren er den samme i alle versioner.
1. Oprettelse af menuen
Når vi har en tom form, så skal du være i "Objekt Mode", og så trykker du på knappen "Menu Editor" som er at finde på din toolbar.
Her kommer du ind i menueditoren.
Når du er i menueditoren, så har du forskellige ting derinde
Funktion opsumeret herunder:
Caption: Punktet på menuen (eks. Filer, Rediger, Funktioner. mf.)
Name: Ligesom du har navn på din form og dine knapper, så har du også et navn på dine menuer. Navngivelse af menuer kommer vi ind på senere.
Index: Dit index bruger du til senere programmering.
-
Så er der 4 pile, som du bruger til at designe menuen mm.
Shortcuts: en række genvejstaster som du kan bruge i din menu (eks. Gem = Ctrl+S)
De andre punkter har jeg valgt ikke at gøre noget ud af, da vi ikke for brug for det i oprettelsen af menuen.
Vi starter med at lave et menupunkt som vi kalder for "Filer".
Caption: &Filer
Name: Menu
Index: 0
Her er det ikke nødvendigt med en genvejs-tast.
Kigger du på ovenstående eksempel, så ser man at der står:
Caption: &Filer
&-tegnet er en funktion der ligger i VB, som går at det bogstav som det står for an (i dette tilfælde F) vil blive understreget når du trykker alt - altså en slags skjult genvej.
Trykker du ok nu, så vil der komme en menu på din form. her vil der dog kun være et eneste punkt, som ikke er andet end en knap.
Skal vi lave under-menuer, så skal vi ind i menueditoren igen.
Her har du stadig din "Filer"-knap, du trykker så på knappen "Next" og du kan nu lave en ny knap.
De 4 pile bruger du til at flytte punkter ind i nye menuer mm.
Prøv og opret endnu et punkt, med Caption: "Å&bn". Navn: "MenuFiler" og index 0, tryk så på det ounkt der er komet nede i liste feltet, og tryk på -> (pilen til højre). Ved at trykke på pilen til højre så kommer punkter Åbn ind under punktet Filer.
Du kan se hvor punkterne ligger i menuen,ved hjælp af de prikker som kommer foran navnet på punktet. (Nede i listen)
Prøv selv at oprette nogle punkter under Filer, og husk at angive index, da det skal bruges til senere programering.
Når du syntes du er færdig med punkterne som skal være i Filer, så vælkger du detnedereste punkt i listen, og trykker på <- for at komme ud af filer.
Prøv så at opret et punkt som du kalder for "Rediger", navnet skal være Menu og index skal være 1 (husk at du kaldte filer for 0).
Prøv så igen at oprette nogle underpunkter i menuen Rediger, kald dem for MenuRediger, og start igen index med 0.
Når du har oprettet disse punkter, forlad da menueditoren, og gå ud i kode vinduet.
Private Sub MenuFiler_Click(Index As Integer)
Select Case (Index)
Case 0
MsgBox "Du trykkede på Åbn"
Case 1
MsgBox "du trykkede på ???"
End Select
End Sub
Som sagt har jeg ikke tænkt mig at lave noget avanceret programmering i denne artikel, derfor har jeg kun lavet msgbox'es.
Som du kan se har jeg lavet en Select Case sætning. Som du måske husker gav vi Åbn som lå under filer index=0, derfor har den case 0, det punkt du selv oprettede og kaldte 1 har så case 1 osv.
Det kan siges ved at dit "Index-nummer" er lige med case nummeret når du skriver i menuens kode.
Til sidst skal der siges, at ønsker du at indsætte en vandret streg i din menu, som en seperator, så gøres det ved en "-".