Típusú szolgáltatók do
Ez a könyv segít elsajátítani a VBA integrált fejlesztői környezet, és megtanulják, hogyan kell programozni a VBA-ban a tárgyak használata, azok tulajdonságait, módszerek és eseményeket. Vizsgálat programozási technikák olyan példák illusztrálják, amelyek segítségével azonnal kipróbálni a gyakorlatban. A megszerzett tudás lesz képes alkalmazni a kiigazítás és javítása népszerű Office alkalmazások, többek között az Office XP alkalmazások és a saját alkalmazásokat.
A könyv azoknak készült, akik mennek gyorsan és könnyedén megtanulják, hogyan kell programozni a Windows, a VBA.
Könyv: VBA kezdőknek
Típusú szolgáltatók Do hurok
Típusú szolgáltatók Do hurok
A VBA többféle ciklus Do Hurok, de minden munka nagyon hasonlóak.
Do Hurok ismétlődik végrehajtását egy blokk-kód csak egy bizonyos feltételes utasítást a cikluson belül nem hajtja végre a parancsot End Do
Do While. Hurok Start és megismétli a végrehajtását egy blokk-kód csak akkor, ha a megadott feltétel értéke igaz
Do Loop While Végrehajtja a blokk kódot egyszer, majd megismétli a végrehajtását mindaddig, amíg a megadott feltétel értéke igaz
Do-ig. Hurok Start és megismétli a végrehajtását egy blokk-kód csak akkor, ha a megadott feltétel értéke hamis
Do Hurok Amíg Végrehajtja a blokk kódot egyszer, majd megismétli a végrehajtását mindaddig, amíg egy előre meghatározott feltétel hamis
Operator Do While. Hurok lehet tekinteni a prototípus szerkezetét Do Itt a szintaxis:
Do While feltétel
(Nyilatkozatok végre, ha a feltétel - True)
Megtalálása üzemeltető Ne Míg VBA kezd ellenőrizze állapotát. Ha a feltétele kifejezés értéke False, VBA figyelmen kívül hagyja a többi ciklus megy közvetlenül a program nyilatkozatot követően a hurok nyilatkozatot. Ha a feltétel értéke igaz, VBA végrehajtja a nyilatkozatok a blokk. Amikor elérte az üzemeltető Loop VBA visszatér az üzemeltető Do While, hogy ellenőrizze állapotát újra.
Jellemzően egy vagy több állítást a hurok test lehet változtatni a kifejezés értékét, amely olyan állapot, ezért a feltétel válhat hamisra. Ebben az esetben a VBA megszünteti a ciklust, és miután átment az összes nyilatkozatait, továbblép a következő nyilatkozatot a hurok nyilatkozatot. De ha a feltétel még, hogy Igaz, loop lesz ismét végre.
Do While intOriginalNumber
intOneDigit = intOriginalNumber Mod 10
strBackwardsNumber = strBackwardsNumber intOneDigit
intOriginalNumber = Int (intOriginalNumber / 10)
Az első ciklusban Ne ellenőrizze, hogy az érték a felhasználó által megadott, és ez nem negatív a beviteli köztük legalább két karakter (különben mi ez átrendeződött?). Amikor a program végrehajtja a ciklus első alkalommal, a változó értéke 0 intOriginalNumber, hiszen mielőtt a változót nem adtunk neki értéket. Zero kevesebb, mint 10, tehát a feltétel igaz, akkor és VBA kezdődik a ciklus végrehajtása.
A ciklus egyetlen szolgáltató, és megjeleníti a beviteli ablak, amelyben a felhasználó meg kell adnunk a megfelelő számot. Miután a számot, Hurok üzemeltető küld folyamat végrehajtását, hogy az elején a ciklus, ahol a bemenet számát ellenőrzik. A ciklus fogja zárni a csak a vizsgálat azt mutatja, hogy a megfelelő számot adták. (Megjegyezzük, hogy ebben a példában kihagyott néhány fontos pontot érvényesítése bemeneti adatok, mint például annak ellenőrzése, hogy az egész számú, és hogy több, mint a maximálisan megengedett integer).
Miután meggyőződtünk a helyességét a megadott értéket VBA továbblép a következő ciklusban. Ennek feltétele, hogy ez a ciklus pozitív értéket egy változó. Mivel a szám nem nulla okot Igaz, akkor ahelyett, hogy a Do While intOricinalNumbe r> 0 levelet Do While intOriginalNumber - mindkét lehetőség ugyanúgy működik.
A ciklus egy egyszerű eljárás három sorban értelmezi számjegye az eredeti szám, kezdve jobbról balra, és ezeket használja a fordított sorrendben, hogy egy új sort. Ahhoz, hogy megértsük, hogyan működik a ciklus, nem feltétlenül megérteni a kódot a cikluson belül, de azt hiszem, a következő magyarázatot nem zavarja.
* Az első sor Mod művelet hozzárendeléséhez használt változó intOneDigit fennmaradó a számot elosztjuk 10. Mivel a számot elosztjuk 10, a maradék lesz az egyik-jegyű számot képviseli az utolsó (jobb oldali) kiindulási jegyű szám.
* A második állítás az így kapott számhoz az első sorral egészül ki a végén a Hozzon létre egy új string értéket.
* A harmadik kijelentés a számot újra van osztva 10, de ezúttal az eredmény tárolása az eredeti változó f. Ha ez a felosztás egyszerűen dobni megfelelő számú jel. v Meg kell jegyezni azonban, hogy mielőtt az eredmény van rendelve egy változó, akkor dolgozza fel a Int. Használata intzdes szükséges, mert különben az eredmény lehet kerekíteni, és ez megváltoztatta a jelek száma, mint az adminisztráció kezdetben.
* Az érték a ciklus folyamat intOriginalNumber áthaladását csökken, és végül válik egyenlő 0, miután az összes számjegyet nem feldolgozott (bármely számjegy azonosítja száma kevesebb, mint 10, és a funkciót intotbrasyvaet törtrészének szám). Az ország hamis A VBA nulla, így a ciklus befejeződik, és a program megmutatja a számot egy fordított elrendezése számok.