fázis III

előző ◈ a következő

A legtöbb objektum hoztak létre a már „tudja”, hogy hogyan működik a program elindítása után, és hajlandó adatokat fogadni a felhasználótól. A belső funkcionalitása létrehozott objektumok - az egyik legerősebb jellemvonása VBA.

A kifejlesztett program is kódot, amely az A értékét kifejezése megadott képlet segítségével számokat a felhasználó által beírt és megjeleníti a számítás eredménye.

A számítási logika csak akkor lehet ágyazni egy alkalmazás kódját, amely meghatározza, hogy milyen programot kell tennie minden egyes szakaszában a munka. A program által működtetett gombok <Вычислить> és (Vége), így a kód lesz társítva érkező információt ezeket a gombokat.

Ahhoz, hogy működjön együtt a programkód a parancs gomb duplán kattint rá. Például kattintson a gombra Az űrlapon. Ezt követően, egy ablak «Cod» (kód) az alábbi képen 30.

30. ábra - Részletek a „Code” mezőbe

egy blokk-kód társítható egy adott tárgy felület, az úgynevezett VBA eljárás események. Az eljárás test zárt gazdasági szereplők közötti jelezve a kezdet és a vég az alprogram.

Private Sub CommandButton2_Click ()

Az üzemeltetők test és végzett eljárások minden egyes alkalommal a felhasználó aktiválja a felhasználói interfész elem az eljárással együtt járó. Ebben az esetben az esemény egy kattintás az egérrel (kattintson), de lehet más típusú eseményt. (Ezek látható a legördülő listából a nyílra a felirat Click).

Mi szoftvereket fejleszteni kódot gombok <Вычислить> és .

1. Az objektumok listáját a «Code» ablakot. Minden felület objektumok kiszámolása jelenik meg a listában, ahogy a 31. ábrán látható.

31. ábra - Az objektumok listáját

2 Kattintson a ParancsGomb1 sorra. Az „üres” eljárást társított gomb .

Annak ellenére, hogy a gomb neve megváltozott <Вычислить>, programot a neve ugyanaz maradt.

Meg kell jegyezni, hogy az egyes interface objektum lehet több vele kapcsolatos eljárásokat - az egyik az egyes kapcsolódó esemény objektumot. Ebben az esetben, a gomb beállítása csak egy esemény - egy kattintással.

3 Dial következő programot sorokat:

Private Sub CommandButton1_Click ()

Dim A, B, X, Z 1, Z2, Z3 As Single

z1 = Abs (Log (X) / Log (10)) - térnél (Abs (Cos (X) - Exp (X)))

Z2 = Abs (Tan (Abs (A * X - B)) / Sin (Abs (X)) + B)

Z3 = ATN (z2 / térnél (Abs (1 - Z2 ^ 2)))

Label1.Caption = log (Abs (z1 * z3))

Megjegyzés. A Val függvény a megadott szöveg argumentum egy numerikus értéket (ez az alapértelmezett bevitt adatokat a beviteli mezőbe be, mint egyszerű szöveg).

4 Kattintson duplán a parancs gombra A forma (vagy válasszon Command2 sort a «Code» ablakot.

5 Tárcsázza a programsor kapcsolódó eljárás egy gomb . Ebben az esetben az egyik szolgáltató End. Arra használják, hogy állítsa le a programot, és törli a képernyőt (32. ábra).

32. ábra - A társított kód parancs gombot 1 és 2

Kapcsolódó cikkek

előző ◈ a következő