Vlastné menu
Sobota 20 septembra 2008 To je druh ponuky, ktoré nám umožňuje ušetriť čas, riadky kódu a lepšie usporiadanie z hľadiska otvorených formách, pretože sa táto ponuka práve potrebujú otvorenú formu. Okrem zníženia počtu otvorených formulárov tiež znižuje počet tlačidiel v menu otvoriť každý formulár.
Tento typ menu, iste, ktorý už nejakú dobu a je už používaný mnohými používateľmi aplikácie Access.
Tak kde je táto ponuka?
Poďme vytvoriť menu pomocou poľa so zoznamom, ktorý obsahuje všetky formuláre, ktoré plánujeme otvoriť cez neho. Keď vyberiete možnosť z poľa so zoznamom sa zobrazí formulár žiadosti v rámci podformuláře. Potom sme začali robiť v menu krok za krokom.
1 - Poďme vytvoriť tabuľku, kde budeme ukladať názov, ktorý chcete, aby každý formulár a názov formulára, ktorý sa otvorí. V príklade som vytvoril Tabuľka 'tblmenu' s nasledujúcich oblastiach:
Typ poľa
Nomedomenu text -> meno, ktoré bude vidieť v menu (combo box)
tvorí text -> názov formulára, ktorý sa otvorí
Po údaje zavedené v príklade sú:
NomedoMenu formulár
Účty Form1
Vklady Form2
Pohyby formulario3
Účet-Box formulario4
Účtu Účet formulario5
Výpis formulario6
2 - Potom sme sa vytvoriť dotaz z predchádzajúcej tabuľky:
Tblmenu zvolil tabuľku a potom vybrať dve polia, v ktorom sme si vybrali pre vzostupné radenie nomedomenu byť jednoduchšie nájsť v ponuke docela niekoľkokrát, keď chceme otvoriť formulára. Ak chcete tento dotaz som volal "CsMenu".
3 - Poďme vytvoriť formulár 'Menu', tj vybrať nový formulár v návrhovom zobrazení. Potom sme sa vytvoriť pole so zoznamom a zmeniť nasledujúce vlastnosti:
- Počet stĺpcov: 2
- Stĺpec Šírky: 1cm, 0cm;
- Pôvod línie: csmenu (čo je názov dopytu vytvorili v predchádzajúcom odseku)
4 - v rovnakej forme budeme vytvárať neviazaný hlavného formulára podformulář (V príklade som volal menuquadro). Je to forma, ktorá bude otvárať každú z foriem vybrať z menu (rozbaľovací zoznam).
5 - Teraz vytvorte modul, ktorý nám umožní otvorenie ponuky, ktorá je vybraná v poli so zoznamom v podformuláře.
Vytvorili sme modul (ktorý som nazval "abrirmenu") a vložiť nasledujúci kód:
Public Function AtivarMenu (Combmenu ComboBox, subabrir podformulář)
As String Dim Abrirform
= Abrirform Combmenu.Column (1)
subabrir.SourceObject = abrirform
subabrir.LinkChildFields = ""
subabrir.LinkMasterFields = ""
End Function
Potom, čo do vlastností poľa so zoznamom V ponuke formulára a po aktualizácii prípade uvedených vytvorená funkcie: ativarmenu = ([Menu], [menuquadro]), že "Menu" je názov poľa so zoznamom a "menuquadro" Názov podformuláře.
A na záver menu je pripravený na použitie. Stačí vyskúšať a používať. Dúfam, že sa vám to páčilo tento tip.
Download: Menu
Pod obrazom v ponuke.
Vlastné menu
