Tässä opetusohjelmassa opit avaamaan ja suorittamaan kyselyitä VBA: ssa.
Olemme luoneet taulukon nimeltä ProductsT ja yksinkertaisen valintakyselyn, joka valitsee taulukosta tuoteluokan, jossa tuotteen nimi on Tuote BBB.
Kyselyn avaaminen VBA: n avulla
Voit avata/tarkastella luomasi kyselyn DoCmD.OpenQuery -menetelmällä. Seuraava koodi avaa kyselyn nimeltä QueryOne:
DoCmd.OpenQuery "QueryOne"
Tulos on:
DoCmd.OpenQuery -menetelmän syntaksi on:
DoCmd.OpenQuery (QueryName, Näytä, DataMode) missä:
| Parametri | Kuvaus |
|---|---|
| QueryName | Tietokannassa olevan olemassa olevan kyselyn nimi, jonka haluat avata/tarkastella. |
| Näytä | Näkymä, jossa haluat avata kyselyn. Tämä voi olla acViewDesign, acViewLayout, acViewNormal, acViewPivotChart, acViewPivotTable, acViewPreview tai acViewReport. Oletus on acViewNormal. (Valinnainen) |
| DataMode | Tietojen syöttötila, jossa haluat avata kyselyn. Tämä voi olla acAdd, acEdit tai acReadOnly. Oletus on acEdit. (Valinnainen) |
Toimintakyselyjen suorittaminen VBA: n avulla
Voit käyttää DoCmd.RunSQL -menetelmää suorittaaksesi kyselyitä, kuten päivityskyselyjä, liitä kyselyitä, poista kyselyitä ja tehdäksesi kyselyitä taulukosta. Seuraava koodi lisää tietueen taulukkoon:
DoCmd.RunSQL "Insert INTO ProductsT ([ProductID], [ProductName], [ProductCategory], [ProductPricePerUnit]) ARVOT (6, 'Product FFF', 'Toys', 10);"
DoCmd.RunSQL -menetelmän syntaksi on:
DoCmd.RunSQL SQL -lausunto, jossa:
SQLStatement - pakollinen ja on SQL -lausunto, joka joko päivittää tietueet, liittää tietueet, poistaa tietueet tai luo uuden taulukon.
Huomautus: DoCmd.RunSQL toimii vain tiettyjen SQL -käskyjen kanssa.
