Posts Tagged "moduulit"
Lauantai 02 toukokuu 2009 |
Joskus on tarpeen estää lomakkeen auki, jos on tietoja osoittamaan, esimerkiksi tehtäessä kysely ja rekisteröintiä ei ole tarpeen, meidän ei tarvitse olla avoinna muotoa koska meillä ei ole dataa. Joten meidän täytyy tarkistaa, onko olemassa kirjaa näyttää, ja jos ei ole näyttää viestin ja estää lomakkeen auki. Miten?
On helppoa vain laittaa koodin alla muodossa ominaisuuksien tapauksessa "avaa":
= 0 Then Jos Form.RecordsetClone.RecordCount
MsgBox "Ei löydy.", VbExclamation, "Virhe!"
DoCmd.Close acForm, "löytää tiedot"
Exit Sub
End If
Voit nähdä esimerkki ladata: Estä Form Open
Posted in esimerkeissä , Lomakkeet , Modules | 2 Comments »
Torstai, 11 joulukuu 2008 |
1 - Luo tilauslomakkeen rakenteeltaan ja tapahtuma "klikkaamalla" ominaisuuksia koskevat lomakkeen tulee seuraavat: me.keypreview = true
Vai onko tämä aikoo tehdä näppäimistötapahtumat saatu ensimmäisessä muodossa.
2 - lomakkeen ominaisuuksia, tapahtuma-painiketta alla "laittaa seuraava koodi:
Private Sub Form_KeyDown (avainkoodi As Integer, Shift As Integer)
Valitse Case avainkoodi
Case vbKeyF2
DoCmd.OpenForm "Form1"
Case vbKeyF3
DoCmd.OpenForm "Form2"
Case vbKeyF4
DoCmd.OpenForm "formulario3"
Case vbKeyF5
Kuten Double Dim laskin
Laskin = Shell ("calc.exe" vbNormalFocus)
Case vbKeyF6
DoCmd.Close
Case Else
Lopeta Valitse
End Sub
Se mitä on seuraava:
- Painamalla F2-näppäin avaa Form1
- Painamalla F3-näppäin avaa Form2
- Painamalla F4-näppäin avaa formulário3
- Painamalla F5-näppäin avaa Windows Calculator
- Painamalla F6-näppäintä sulkee lomakkeen
Lisäksi funktionäppäintä F1, F2 ... jne, voimme käyttää myös mitä tahansa muuta painiketta suorittamaan tehtäviä, mutta pitää mielessä, että jos haluamme syöttää tietoja muodossa, ei sovellu käyttää avaimia, joita käytetään kirjoittaa tietoja kenttiin.
Toinen asia on, että se toimii vain lomake, johon laitat yllä olevat koodit.
Lataa: Keys
Posted in esimerkeissä , Lomakkeet , moduulit | 1 Comment »
Lauantai, 20 syyskuu 2008 |
Tämä on eräänlainen valikon, jonka avulla voimme säästää aikaa, riviä koodia ja parempi järjestely kannalta avoimen yhteistyön muotoja, koska tämä valikko tarvitsee vain avoimen muodon. Vähentämisen lisäksi useita avoimia lomakkeita vähentää myös määrä painikkeita avataksesi kunkin muodon.
Tämän tyyppinen valikko, varmasti on ollut olemassa jo jonkin aikaa ja on jo käytössä monissa käyttäjät Access.
Missä on tämä valikko?
Luodaan valikossa yhdistelmäruudun, joka sisältää kaikki lomakkeet, aiomme avata sen läpi. Kun valitset vaihtoehdon pudotusvalikosta hakulomake näkyy sisällä alilomakkeen. Sitten alkaa tehdä valikon askel askeleelta.
1 - Luodaan taulukko jossa tallentaa nimi, jonka haluat antaa kunkin muodon ja nimen lomakkeen, joka avautuu. Tässä esimerkissä luodaan taulukko "tblmenu" kanssa seuraavilla aloilla:
Kentän tyyppi
Nomedomenu teksti -> nimi, joka näkyy valikossa (combo box)
muodostavat teksti -> nimi muodossa avaa
Sen jälkeen kun data käyttöön esimerkin ovat:
NomedoMenu Form
Tilit Form1
Talletukset Form2
Liikkeet formulario3
Tili-Box formulario4
Account-tilin formulario5
Pura formulario6
2 - Sitten luomme kyselyn edellisestä taulukosta:
Tblmenu valitsi pöydän ja valitse kahdella alalla, joilla olemme valinneet nousevasti Järjestä nomedomenu olla helpompi löytää valikon aika monta kertaa kun haluamme avata lomakkeita. Tässä kyselyssä kutsuin "CsMenu".
3 - Luodaan lomake "Menu" eli valitse uusi lomake rakennenäkymässä. Sitten luomme yhdistelmäruudun ja muuttaa seuraavia ominaisuuksia:
- Palstojen määrä: 2
- Sarakeleveydet: 1cm, 0cm;
- Alkuperä rivi: csmenu (mikä nimi kyselyn luotu edellisessä kohdassa)
4 - samassa muodossa luomme sitoutumattoman tärkein lomakkeen alilomaketta (Tässä esimerkissä Soitin menuquadro). On tässä muodossa tullaan avaamaan Kunkin lomakkeen valita valikosta (pudotusvalikosta).
5 - Luo nyt moduuli, jonka avulla voimme avata valikon, joka on valittu yhdistelmäruudussa on alilomakkeen.
Loimme moduuli (jota kutsuin "abrirmenu) ja liitetään seuraava koodi:
Public Function AtivarMenu (Combmenu ComboBox, subabrir alilomaketta)
Abrirform As String Dim
= Abrirform Combmenu.Column (1)
subabrir.SourceObject = abrirform
subabrir.LinkChildFields = "'
subabrir.LinkMasterFields = "'
End Function
Kun menee ominaisuuksia yhdistelmäruudussa lomakkeen valikon ja päivityksen jälkeen tapahtuman laittaa perustettuun: ativarmenu = ([Menu] [menuquadro]), että "Menu" on nimi pudotusvalikosta ja "menuquadro" nimi alilomakkeen.
Ja lopuksi valikko on valmis käyttöön. Vain kokeilla ja käyttää. Toivottavasti olet nauttinut tätä kärki.
Download: Menu
Alla kuva valikosta.
Custom Menu
Posted in esimerkeissä , Lomakkeet , Modules | 12 Comments »
Tiistai 06 toukokuu 2008 |
Tämä esimerkki osoittaa, miten hallintajärjestelmä tarjonnan maksuja.
Esimerkki osoittaa, että tämä ei ole luoda ja automaattisesti napin painalluksella, edut ostosopimuksen kautta syötetyt tiedot. Eli esittelemme asiakkaan nimi sopimukseen aloituspäivä ja täysin maksettu. Sitten klikkaa "laskea maksut", että se luo automaattisesti määrää erissä ja jakaa ilmoitettu arvo kunkin niistä ja laskee päivämäärän kunkin erän (yksi per kuukausi). Tämä on myös esimerkki, joka osoittaa, miten lisätä useita tietueita kerralla, sillä kun osoitat painiketta se tuo ennätys jokaiselle hyötyä.
Lataa: Lisää useita tietueita
Posted in taatelit , näytteet , lomakkeet , Modules , Records | 17 Comments »
Lauantai, 29 maaliskuu 2008 |
Tämä on esimerkki käyttökohteisiin, että Sonia lukija on tarkoitettu tietokantaan tietuetieto eläimiä. Se on yksinkertainen tietokanta vain lomakkeen tietojen syöttämistä joiden kuva eläimen.
Download: Löytöeläintaloon
Jokainen muutos vain kommentoida täällä.
Kirjalliset lomakkeet , kuvat , moduulit , Records , taulukot | 12 Comments »
Keskiviikko, 20 helmikuu 2008 |
On olemassa useita tapoja kirjoittaa kirjaa, ja yleisin on saada läpi lomake sidottu taulukkoon. Toinen tapa tehdä tämä on kautta liity aloilla, kuten käyttämällä lomakkeen kenttiä itsenäinen liity taulukkoon. Voit
syöttää tiedot käytämme "tietuejoukon", ts. koodilla, jossa tapauksessa tämä esimerkki on seuraava:
Dim db Koska Database
Dim rs Koska Recordset
Jos MsgBox ("Haluatko kirjoittaa?" VbYesNoCancel, "Asetukset") = vbYes sitten
"Painamalla kysytään tallentaa sen tai ei, jos koodia jatkuu loppuun asti
Set db = CurrentDb ()
Set rs = db.OpenRecordset ("Data", dbOpenTable)
"Avaa pöytä lisätä tietorekisteriin
rs.AddNew
rs ("nimi") = Me! INome
rs ("osoite") = Me! Imorada
rs ("ikä") = Me! Iidade
rs.Update "lähettää tiedot taulukkoon
rs.Close "Tyhjennä tiedot ja sulkee tietuejoukkoa
Set rs = Nothing
Set db = Nothing
Me.INome = Null 'tyhjentää lomakkeen kentät
Me.Imorada = Null
Me.Iidade = Null
MsgBox "Record pelastettu", vbInformation, "Valmis" "näyttämään viestin
Me.INome.SetFocus "Siirrä kohdistin ensimmäiseen kenttään
Else: Exit Sub
End If
Lataa: Sijoita Independent
Posted in esimerkeissä , lomakkeet , moduulit , Records , pöydät | No Comments »
Tiistai, 19 helmikuu 2008 |
Tämä esimerkki osoittaa, miten tehdä laskutoimituksia tuntia. Siitä on hyötyä niille, jotka täytyy tietää, kuinka paljon aikaa kului alkamisaika ja päättymisaika. Ei riitä, että vähentämällä päättymisaika alkamisaika, sillä jos lopunajan liikkuvat yhdestä yössä tilit eivät enää oikeaa, esimerkiksi:
Alkamisaika: 23:00:00
Päättymisaika: 02:00:00
Päättymisaika - Start Time = 2:00:00 ja 23:00:00 = -21:00:00
Ilmeisesti ei ole kovin helppoa käsitellä aikaa, koska silloin sen sijaan, että kolme tuntia oikean tulos olisi väärin -21 tuntia.
Voit kiertää tämän ajan joka kulkee päivittäin meidän on ensin tarkistaa päättymisaika on suurempi kuin alkamisaika, kumpi on suurempi silloin laskelma: End Time - Alkamisaika.
Jos olet alle meidän täytyy tehdä laskelman toisella tavalla, nimittäin:
Alkamisaika: 23:00:00
Päättymisaika: 02:00:00
Yhteensä aika: 23:59:59
Hit: 00:00:01
Periaatteessa mitä teemme on lisätä arvoa 24:00:00 vähennyslaskun antaa meille oikeat kolme tuntia. Tämä on:
Päättymisaika - Alkamisaika + Total Hours + Hit = 02:00:00 jotta 23:00:00 + 23:59:59 + 00:00:01 = 24:00:00 = 03 + -21:00:00 : 00:00
Lataa: Calculus Time
Posted in esimerkeissä , lomakkeet , Hours , Modules | 21 Comments »
Keskiviikko, 06 helmikuu 2008 |
Tämä esimerkki osoittaa, kuinka valita päivämäärää PopUp kalenteri. Eli kun moduuli ja voivat muodostaa valitse päivänä kuin tämä on kalenteri. Esimerkissä voimme valita päivämäärän napsauttamalla vieressä mennessä kenttään tai klikkaamalla oikealla painikkeella hiiri päivämäärä kenttään. Tämä tapa kirjoittaa päivämäärät on hyvin käytännöllinen, sillä se antaa meille mahdollisuuden nähdä kalenterin ja valita parhaan haluamasi päivämäärän.
Download: PopUp kalenteri
Posted in taatelit , näytteet , Lomakkeet , moduulit | 1 Comment »
Sunnuntai, 27 tammikuu 2008 |
Yleensä kun ajaa keskellä painiketta hiiren lomakkeella, muuta pääsyä loki. Joissakin tilanteissa voi olla hyödyllistä, että ei tapahdu.
Tässä esimerkissä käytetään moduulin tapauksessa muodon ladata, jotta käyttäjä liikun tietueet käyttäen rullahiiri. Voit testata voimme käyttää hiiren rullaa (keskimmäinen painike) todeta, että ei muuta rekisteröintiä.
Lataa tästä: hiiri
Posted in esimerkeissä , lomakkeet , moduulit , hiiri , Records | No Comments »
Maanantai, 21 tammikuu 2008 |
Tässä esimerkissä käytetään moduulin, joka kätkee Microsoft Access pääikkunassa jättäen vain lomakkeen ikkunasta näkyvä.
Voit käyttää tätä moduulia meidän on käytettävä seuraavan komennon avajaistilaisuus muotoa: puhelu fsetAccessWindow (SW_HIDE).
Voit tarkistaa esimerkkinä do ladata tai: Käsittele Window Acces
Posted in esimerkeissä , Lomakkeet , Modules | 8 Comments »
