Egyedi menü
Szombat, szeptember 20, 2008 Ez egyfajta menü, amely lehetővé teszi számunkra, hogy időt takaríthat meg, sornyi kódot és egy jobb elrendezése szempontjából nyitott formában, mivel csak ezzel a menüvel kellene készíteniük egy nyílt. Amellett, hogy csökkenti a számos nyitott formában is csökken a gombok száma, a menü megnyitásához minden formáját.
Ez a fajta menü, természetesen, amely már egy ideje, és már sokan használják a felhasználók az Access.
Szóval hol van ez a menü?
Hozzunk létre a menüt a kombinált lista, amely tartalmazza az összes formákat tervezzük megnyitni rajta. Amikor kiválaszt egy beállítást a legördülő pályázati űrlap jelenik meg a subform. Akkor kezdjük, hogy a menü lépésről lépésre.
1 - Hozzunk létre egy táblázatot, ahol majd tárolni kívánt nevet adni minden formáját és nevét, hogy az űrlap nyílik meg. A példában hoztam létre a táblázat tblmenu "az alábbi területeken:
Mező típusa
Nomedomenu szöveg -> neve, amely látható lesz a menü (combo box)
szöveges formában -> neve a nyomtatvány, amely megnyitja
Miután az adatokat bevezette a példában a következők:
NomedoMenu Form
Számlák Form1
Betétek Form2
Változások formulario3
Fiók-Box formulario4
Számla-Account formulario5
Kivonat formulario6
2 - Ezután hozzon létre egy lekérdezést az előző táblázat szerint:
Tblmenu választotta az asztalra, majd válassza ki a két terület, ahol úgy döntöttünk, a növekvő rendezési nomedomenu könnyebb megtalálni a menüben jó néhány alkalommal, amikor meg akarjuk nyitni formák. Ahhoz, hogy ez a lekérdezés hívtam "CsMenu".
3 - Alkoss a formában "Menu", vagyis válasszon új űrlapot Tervező nézetben. Majd létrehozunk egy combo box és módosítsa a következő tulajdonságokkal rendelkezik:
- Oszlopok száma: 2
- Oszlop Szélesség: 1cm, 0cm;
- Eredete a következő sort: csmenu (ez a neve a lekérdezés létre az előző bekezdésben)
4 - Az azonos formában hozunk létre egy kötetlen űrlap subform fő (a példában hívtam menuquadro). Ez ebben a formában fog nyitni egyes formák közül választhatnak a menüt (combo box).
5 - Hozzon létre egy modult, amely lehetővé teszi számunkra, hogy nyissa meg a menüt, amelyet kiválasztva a kombinált listában a subform.
Készítettünk egy modul (amit az úgynevezett "abrirmenu) és illesztette be a következő kódot:
Public Function AtivarMenu (Combmenu A ComboBox, subabrir A Subform)
As String Dim Abrirform
= Abrirform Combmenu.Column (1)
subabrir.SourceObject = abrirform
subabrir.LinkChildFields = ""
subabrir.LinkMasterFields = ""
End Function
Után megy a tulajdonságok a legördülő menüben az űrlapon, és a frissítés után esetben tegye a létrehozott funkció: ativarmenu = ([Menu], [menuquadro]), hogy a "Menu" a neve a beviteli mezőbe, és "menuquadro" a neve subform.
És végül a menü készen áll a használatra. Csak próbáld ki, és használni. Remélem élvezték ezt a tip.
Letöltés: Menu
Alább egy kép a menü.
Egyedi menü
