Page 54 - 4788
P. 54

Рисунок 3.6 –   Результат виконання програми

                                  6. Натиснути кнопку Начать на панелі Стандартная.
                                  7.  З'явиться  вікно  з  повідомленням  х=.  В  поле  вводу
                            ввести значення змінної – 3.4 і натиснути Ok або Enter.
                                  8. З'явиться нове вікно з повідомленням z=. В поле вводу
                            ввести  значення  змінної  –  5.6  і  натиснути  Ok  або  Enter.
                            З'являться результати обчислень (рис.3.1):
                                                  х=3.4  z=5.6  у =11.13332.
                                  Для введення і виведення інформації (початкових даних,
                            коментарів,     пояснень,    результатів    )   можна     також
                            використовувати  такі  елементи  управління  як  TextBox,
                            ComboBox, ListBox, FlexGrid.

                                   У  наступному  прикладі  розглянемо  статичні  та
                            нестатичні змінні. Статична змінна А при кожному клацанні
                            на  кнопці  Command1  збільшується  на  одиницю.  Нестатична
                            змінна В при кожному клацанні ініціалізується заново, тому її
                            значення на виході 1.
                                     Щоб  оголосити  статичними  всі  локальні  змінні
                            процедури, варто записати ключове слово Static  у заголовку
                            процедури.
                                  Private Sub Command1_Click()
                                  Static a As Integer
                                  Dim b As Integer
                                  a = a + 1
                                  b = b + 1
                                  Print a


                                                           52
   49   50   51   52   53   54   55   56   57   58   59