Posts Tagged "Esimerkkejä"
Lauantai, 16 lokakuu 2010 |
Jonkin aikaa päivittämättä Blog, vihdoin sain aikaa päivittää myynnin järjestelmän. Monet lukijat eivät päässeet, koska järjestelmään kirjautuminen salasanan kysyi. Joten poistin kirjautuminen järjestelmän helposti.
Sen lisäksi, tämä muutos tehdään seuraavat muutokset:
V 0.5.0 (2010-08-19)
- Poistettu login ja käyttäjille.
- Lisätty kentät (perhe, iva ja yhtenäisyys) tuotteissa taulukossa.
- Olen luonut taulukon alv.
- Muuttaminen tuotteiden muodossa. (Uudet kentät, ilme, uusi tapa etsiä tietueet).
- Olen luonut taulukon perhe (tuotteet).
- Muuttunut muodossa ostostarjontaa vain lisätään yksi tuote kerrallaan. Laitoin muodossa ostaa alilomakkeen johon voit kirjoittaa useita tuotteita ostetaan tietty toimittaja.
Download: 2010 Myynti
Kaikki kommentit uuden päivityksen korjata tai lisätä ominaisuuksia.
Tulevaisuudessa olen ajatellut muuttaa sijaintia, jossa on ladattavia tiedostoja, koska jos on toimintaa tiedostoon jonkin aikaa, tiedosto poistetaan. Joten Pyrin vaihtoehdon helposti jakaa tämä ei käy.
Seuraavassa post laitan version miten etuuksien laskennassa samanlainen kuin jo täällä postitse , vaan ottaa kuukausimaksut voi valita montako päivää kuluu jokaisen erän. Tämä esimerkki toimii myös vastata kysymykseen lukija ( Marcelo ).
Posted in esimerkeissä , lomakkeet , Complete System | 14 Comments »
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 »
Torstai 19 kesäkuu 2008 |
Tämä oli varmasti pelaaja Elton Rueb ja hän jopa onnistui ratkaisemaan ennen kuin auttaa. Mitä lukija oli tarkoitus mitata aikaa kuluu käyttäjä lisätä kirjaa ja siinä on kolme kenttää: yksi alun, kun se avaa lomakkeen ensimmäisen kerran pää joka asetetaan kun painat tallentaa painiketta ja kenttä laskea erotuksen. Tämä on yksinkertainen esimerkki, mutta saattaa puuttua niille, jotka haluavat laskea kahden eri aikoina. Joten Elton Rueb (Rio de Janeiro - RJ - Brasilia) edellyttäen esimerkki, joka voisi auttaa joku muu.
Download: Test Time
Posted in taatelit , näytteet , esimerkit siirretään , ilmaukset , lomake , aika | 2 Comments »
Torstai 12 kesäkuu 2008 |
Lukija Jacinto esittää kysymyksen täällä miten muuttaa muotoa päivämäärä 12.6.2008 for 2 0 0 8 0 6 1 2, vaste kuten edellä kommentit on yhtä helppoa kuin tekstikehys seuraavalla lausekkeella:
= Format ([päiväys kentän nimi] ", mm dd yyyy")
ja ominaisuudet kentän laittaa seuraavat sanat tulo mask: 0 \ 0 \ 0 \ 0 \ 0 \ 0 \ 0 \ 0 \ 0
Aika yksinkertainen ja helppo. Seuraa esimerkki ladattavissa: Format päiväys
Posted in taatelit , esimerkeissä , ilmaukset , Lomakkeet | No 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 »
Sunnuntai, 06 huhtikuu 2008 |
Niille, jotka haluavat antaa erilainen vaikutus muotoihin, erityisesti kun astumme tietoja, voimme muuttaa väriä alalla, jossa kursori. Eli kaikki tiedot kentät ovat valkoisia kuin alalla, jossa me kirjoitamme, että on jonkin muun värinen.
Tätä on erittäin helppoa, valitset vain kentät ja valita taustavärin haluat näkyvän, kun kohdistin on kentässä, ja sitten vaihtaa väriä läpinäkyviksi.
Download: Vaihda väriä datakentässä
Posted in Colors , näytteet , Lomakkeet | 10 Comments »
Tiistai, 18 maaliskuu 2008 |
Pyynnöstä pelaajan Joao Cabrita kehitetty Tällainen valvonta seikka koskee paloasema, tarkemmin tarpeisiin lukija.
Se on perus esimerkki, mutta jotkin kehittyneemmät yksityiskohtia, mitä on tarkoitus tehdä valvonta sisään-ja uloskäynnit työntekijöiden, tarkista, että toimi 12 tunnin työvuoro ja lisää työtunteja ja työtunnit on vähemmän.
Kaikki tämä kuukausiraportin osallistumisprosentti jokaisen työntekijän.
Download: Point
Kirjallinen kuuleminen , päivämäärät , esimerkit , ilmaukset , lomakkeet , h , raportit | 9 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 »