Vajad kellegagi rääkida?
Küsi julgelt abi LasteAbi
Logi sisse
Sulge

"sisendboks" - 2 õppematerjali

VBA-sisse lahendatud algus
34
xls

VBA (sisse lahendatud algus)

tõene tingimus End Sub Loop While tingimus väär Sub Mäng_3() ' Kordab lööke. Juhitav kordus Dim n% Range("andmed").ClearContents n = InputBox("Mitu lööki?", "Juku", 20) n - täisarvuline muutuja - löökide arv Do % - tüübi (täisarvu) tunnus Löök InputBox - sisendboks (VBA funktsioon) paus 0.5 Msgbox - teateboks (VBA funktsioon) Loop While Range("lööke") < n MsgBox "Aitäh! Kohtumiseni!", , "Juku" End Sub Mäng_1() Sub Mäng_2() matu kordus, DoEvents ' Lõpmatu kordus, paus nge("andmed").ClearContents Range("andmed").ClearContents Do all Löök Call Löök

Informaatika → Informaatika
111 allalaadimist
Visual Basic
18
doc

Visual Basic

Lausete põhielementideks on konstandid, nimed, avaldised ja võtmesõnad. Viimased on kindla esitusviisi ja tähendusega ingliskeelsed sõnad või fraasid (If, Else, For, End Sub jmt), mida käsutatakse ainult kindla lause kindlas köhas. Toodud protseduur koosneb viiest lausest. Esimene ja viimane lause moodustavad omavahel seotud paari: esimene määrab protseduuri alguse ja selle nime, viimane protseduuri lõpu. Teise lause täitmisel kuvatakse Visual Basicu sisendboks, milles on esitatud lauses toodud küsimus. Boksi tekstivälja saab sisestada vastuse ning pärast klõpsatust nupule OK võetakse vastus muutuja aasta väärtuseks. Järgnev IF-lause võrdleb muutuja aasta väärtust konstandiga 1976, kui need on võrdsed, siis võetakse muutuja teade väärtuseks tekst Õige!, vastupidisel juhul Vale!. Eelviimane lause kuvab teateboksi, milles on esitatud muutuja teade väärtus. VBA rakendustes võib käsutada kahte liiki protseduure:

Informaatika → Arvutiõpetus
62 allalaadimist


Sellel veebilehel kasutatakse küpsiseid. Kasutamist jätkates nõustute küpsiste ja veebilehe üldtingimustega Nõustun