Príspevky Tagged 'moduly,
Sobota 02.05.2009 |
Niekedy je nutné, aby sa zabránilo formulár otvorený, ak tam sú záznamy, ktoré ukazujú, napríklad pri vykonávaní dotazu a žiadna registrácia nie je nutná, nepotrebujeme byť otvorené, pretože nemáme žiadne dáta na zobrazenie. Takže to, čo musíme overiť, či existujú záznamy, ktoré ukazujú, a ak nie je zobraziť správu a brániť formou otvorené. Ako?
Je to jednoduché stačí dať kód nižšie vo forme nehnuteľností v prípade "otvoriť":
= 0 Then Ak Form.RecordsetClone.RecordCount
MsgBox "Nenašli sa nijaké záznamy.", VbExclamation, "Chyba!"
DoCmd.Close acForm, "nájsť dáta"
Exit Sub
End If
Ak chcete vidieť príklad stiahnutie: Zabrániť formulár Otvoriť
Publikované v príkladoch a formy a Modules | Užívateľské 2 Komentáre »
Štvrtok 11.12.2008 |
1 - Vytvorenie objednávkový formulár v štruktúre a udalosti, "Kliknutím" na vlastnostiach formulára zadajte nasledujúci príkaz: me.keypreview = true
Alebo sa to deje, aby sa klávesnica je udalosť prijatá v prvom formulári.
2 - vo forme nehnuteľností, akcie 'tlačidlo nižšie "vložte nasledujúci kód:
Private Sub Form_KeyDown (KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Prípad vbKeyF2
DoCmd.OpenForm "Form1"
Prípad vbKeyF3
DoCmd.OpenForm "Form2"
Prípad vbKeyF4
DoCmd.OpenForm "formulario3"
Prípad vbKeyF5
Ako Double Dim Calculator
Kalkulačka = Shell ("calc.exe", vbNormalFocus)
Prípad vbKeyF6
DoCmd.Close
Case Else
Koniec Vybrať
End Sub
Čo to však je nasledujúci:
- Stlačením klávesy F2 sa otvorí Form1
- Stlačením klávesy F3 sa otvorí Form2
- Stlačením klávesy F4 otvorí formulário3
- Stlačením klávesy F5 otvorí kalkulačku Windows
- Stlačením klávesy F6 zavrie formulár
Okrem F1 funkčných kláves, F2 ... atď, môžeme použiť akékoľvek iné tlačidlo na plnenie funkcií, ale mať na pamäti, že ak chceme zadať údaje v takej forme nie je vhodné používať kľúče, ktoré sa používajú pre zápis dát na poliach.
Ďalšia vec je, že funguje len na formulári, kde si dať vyššie uvedené kódy.
Download: Keys
Publikované v príkladoch a formy a Modules | Užívateľské 1 Comment »
Sobota 20 septembra 2008 |
Jedná sa o druh z menu, ktoré nám umožňuje ušetriť čas, riadky kódu a lepšie usporiadanie v podmienkach otvorených foriem, 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é sme 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
Publikované v príkladoch a formy a Modules | Užívateľské 12 Komentáre »
Utorok 06.05.2008 |
Tento príklad ukazuje, ako systém riadenia pre poskytovanie platieb.
Príklad ukazuje, že to je vytvoriť a automaticky sa kliknutím na tlačidlo, výhody zmluvy o predaji prostredníctvom zadaných dát. To znamená, že sme zaviedli na meno klienta ku dňu začatia zákazky a celkovú sumu splatnú. Potom stačí kliknúť na odkaz vypočítať platby ", aby sa automaticky generuje počet splátok a rozdeľuje hodnoty uvedené v každom z nich a vypočíta dátum každej splátky (jedna za mesiac). To je aj príklad, ktorý ukazuje, ako pridať viac záznamov naraz, pretože keď kliknete na tlačidlo pridá záznam pre každú dávku.
Download: vložiť viac záznamov
Publikované v dátach a Vzorky a formulárov a Moduly a nahráva záložky | 17 Komentáre »
Sobota 29. marca 2008 |
Toto je ukážka z aplikačnej oblasti, ktoré Soňa čitateľ určených pre dáta záznamu databázy zvierat. Je to jednoduché databázy s len formuláre pre vstup dát s fotkou zvieraťa.
Download: útulku
Každá zmena, len komentár tu.
Písomnej formy a Fotografie a moduly a záznamy a tabuľky záložky | 11 Komentáre »
Streda 20. februára 2008 |
Existuje niekoľko spôsobov, ako zadať záznam, a najčastejšie je získať prostredníctvom formulára viazaný do tabuľky. Ďalším spôsobom, ako to dosiahnuť, je pomocou nesúvisiacich oblastiach, tj na formulári s poli nezávislej nesúvisiacich k stolu. Na
zadajte údaje, ktoré používame na trase záznamov ', tj pomocou kódu, ktorý je v prípade tohto príkladu je nasledovné:
Dim db ako databáza
Dim rs Ako Recordset
Ak MsgBox ("Chcete písať?" VbYesNoCancel, "Možnosti") = vbYes potom
"Po stlačení sa spýtal, či chcete uložiť záznam, alebo nie, ak áno, kód pokračuje až do konca
Set db = CurrentDb ()
Set rs = db.OpenRecordset ("Dáta", dbOpenTable)
"Otvorte tabuľku vložiť dátumu registrácie
rs.AddNew
rs ("meno") = Me! Inom
rs ("adresa") = Me! Imorada
rs ("vek") = Me! Iidade
rs.Update "posiela dáta do tabuľky
rs.Close "Zmazať dáta a zavrie záznamov
Set rs = Nothing
Set db = Nothing
Me.INome = null "vymaže pole v tvare
Me.Imorada = null
Me.Iidade = null
MsgBox "zachránil Record", vbInformation "Hotovo" "Display správu s potvrdením
Me.INome.SetFocus "Presuňte kurzor na prvé pole
Else: Exit Sub
End If
Download: Miesto Nezávislé
Publikované v príkladoch a formy a Modules a záznamov a stoly | Užívateľské No Comments »
Utorok 19.februára 2008 |
Tento príklad ukazuje, ako vykonávať výpočty hodín. To je užitočné pre tých, ktorí potrebujú vedieť, koľko času uplynulo medzi počiatočný a koncový čas. Nestačí, aby odčítanie konečného času na čas začiatku, pretože ak doba ukončenia presunu z jedného dňa na deň účty už nebude v poriadku, napríklad:
Start Time: 23:00:00
Čas ukončenia: 02:00:00
Koniec - Start Time = 02:00:00 do 23:00:00 -21:00:00 =
Zrejme to nie je tak jednoduché pracovať s časom, pretože potom namiesto toho, aby tri hodiny správny výsledok chybne -21 hodín.
Ak chcete získať okolo tohto obdobia, ktoré ide zo dňa na deň sme sa mali pozrieť, ak doba ukončenia je väčší ako počiatočný čas, podľa toho, čo je väčšia ako výpočet je: Koniec - Start Time.
Ak je vám menej potom musíme urobiť výpočet inú cestu, a to:
Start Time: 23:00:00
Čas ukončenia: 02:00:00
Celkový čas: 23:59:59
Hit: 00:00:01
V podstate to, čo urobiť, je pridať k hodnote 24:00:00 odčítanie, aby nám správne tri hodiny. To je:
Koniec - Štart čas + celkový počet hodín + Hit = 02:00:00 do 23:00:00 + 23:59:59 + 00:00:01 = 24:00:00 = 03 + -21:00:00 : 00:00
Download: Matematika s časom
Publikované v príkladoch a formy a Hours a Modules | Užívateľské 20 komentárov »
Stredu 6.2.2008 |
Tento príklad ukazuje, ako si vybrať dátum prostredníctvom kalendára PopUp. To je, ako modul a môže tvoriť vyberte dátum, pretože to je kalendár. V tomto príklade si môžeme vybrať dátum, kliknutím na tlačidlo vedľa dátového poľa alebo kliknutím pravého tlačidla myši v dátovom poli. Tento spôsob zadávania dát je veľmi praktický, pretože nám umožňuje vidieť kalendár a vybrať najlepšie dátum, kedy chcete.
Download: PopUp Kalendár
Publikované v dátach a Vzorky a formulárov a Moduly | Užívateľské 1 Comment »
Nedeľa 27.leden 2008 |
Zvyčajne, keď sme sa spustiť na stredové tlačidlo myši na formulári, zmeniť prístupový protokol. V niektorých situáciách to môže byť užitočné, že sa nestane.
Tento príklad používa modul v prípade, že formulára načítať, aby sa zabránilo užívateľ prechádzať záznamy pomocou navigačné myši. Pre otestovanie môžeme použiť koliesko myši (prostredné tlačidlo) vidieť, že nemení registrácii.
Na stiahnutie tu: myš s kolieskom
Publikované v príkladoch a formy a Modules a myš a Records | Užívateľské No Comments »
Pondelok 21 január 2008 |
Tento príklad používa modul, ktorý skryje hlavné okno programu Microsoft Access, takže len formou je okno viditeľné.
Ak chcete použiť tento modul musíme použiť nasledujúci príkaz na začatie akcie v tvare: volania fsetAccessWindow (SW_HIDE).
Ak chcete skontrolovať ako príklad robiť downloa: Manipulácia okien príslušen
Publikované v príkladoch a formy a Modules | Užívateľské 8 Komentáre »
