• Гідрологія і Гідрометрія
• Господарське право
• Економіка будівництва
• Економіка природокористування
• Економічна теорія
• Земельне право
• Історія України
• Кримінально виконавче право
• Медична радіологія
• Методи аналізу
• Міжнародне приватне право
• Міжнародний маркетинг
• Основи екології
• Предмет Політологія
• Соціальне страхування
• Технічні засоби організації дорожнього руху
• Товарознавство продовольчих товарів

Public B As Integer

End Sub

Static A As Integer

End Sub

Dim B As Integer

A = A+1

B = B+1

MsgBox(“A =”&A)

MsgBox(“B =”&B)

При кожному клацанні по кнопці Command1 змінна Абуде збільшуватися на 1 а змінна В буде дорівнювати завжди 1.

Контейнерні змінні визначаються в секції General (об’єкт) процедури Declarationsза допомогою операторів Dim або Private. Секція General (Declarations) знаходиться над процедурою. В такому випадку змінна буде зберігати своє значення до наступного виконання програми і враховуватися при розрахунках.

(Private) Dim B As Integer

Private Sub Command1_Click()

A=A+1

B=B+1

MsgBox(“A=”&A)

MsgBox(“B=”&B)

Глобальні змінні оголошуються також в секції General(Declarations) за допомогою оператора Public.

Наприклад:

Якщо рядкову змінну Name, оголошену як Public у формі Form1 то дістати доступ до неї можна з іншої форми за допомогою наступного виразу:

X=Form1.Name.

Для оголошення констант використовується оператор Const, Одночасно з оголошенням констант їм присвоюється значення. Наприклад:

Const Pi = 3.141592(у дробовому числі повинна бути крапка а не кома)

Circle = Pi*Radius^2

Константи можна оголосити також із значенням типу даних, при цьому використовуються ті самі ключові слова, що й при оголошенні змінних.

Const Pi As Single =3.141592

3.4. Основні елементи керування для створення написів та введення текстових даних

ЕлементLabel дозволяє створювати написи на формі додатку. Для цього властивості Caption привласнюється якісь текстові дані. Даному елементу можна привласнити в програмі текстові дані наприклад: Label1.Caption = C. Це означає, що текстове значення змінної С буде привласнено властивостіText елемента Label1, для VBA Label1 = C або навпаки, це означає що в програмі можна використовувати цей елемент для введення в нього та виведення текстових даних.

ЕлементTextBox призначена для введення або виведення числових і текстових символів в елемент керування TextBox, числові символи сприймаються як текст. Наприклад: А =TextBox1.Text. Така запис означає, що при запуску в роботу програми значення яке буде введено в перший елемент TextBox1і буде привласнено змінній А. Тип змінноїА повинен бути String.Цей елемент може бути однорядковим чи багаторядковим в залежності від встановлених властивостей: Single-line (однорядкове текстове поле), Multi-line (багаторядкове текстове поле). Для виведення даних: TextBox2.Text = Ціна * Кількість.

3.5. Основні функції Visual Basic

Функція – це оператор, що виконує певні дії (наприклад, запит користувача на введення інформації або обчислення за формулою), а потім повертає результат своєї роботи. В цілому це закінчений фрагмент програми.

Стандартні функції.Це функції які є складовими компонентами системи Visual Basic, тобто вбудовані в систему. До них належать математичні, рядкові, фінансові та інші. Наприклад: Обчислення квадратного кореня для Visual Basic.Net Y = Math.Sqrt(x) для VBA Y = Math.Sqr(x). Математичні та рядкові вбудовані функції приведені в таблицях 2,3.

Таблиця 2. Найпоширеніші математичні функції

Таблиця 3. Найпоширеніші рядкові функції

Фінансові функції.Фінансові функції мають більш як один аргумент.

До фінансових функцій відносяться такі: NPer, Rate, Pmt, Pv, Fv. Усі фінансові функції мають однакову структуру написання. Наприклад, функція Nper має такий синтаксис NPer(Rate,Pmt,Pv,Fv), де Nper -число облікових періодів, Rate -процентна ставка за один обліковий період, Pmt -сумма періодичного платежу, Pv -справжня вартість внеску, Fv -майбутня вартість внеску.

Фінансові функції записуються по такому правилу, щоб знайти відповідну фінансову функцію необхідно її винести за скобки такого виразу (Rate,NPer, Pmt,Pv,Fv).

Функції з формування вікна для введення виведення даних

Функція InputBox.Забезпечує формування вікна для введення даних в текстовому виді з відображенням його заголовка і запрошення до користувача.

Синтаксис функції:

P = InputBox("Запрошення для введення текстових даних", " Заголовок вікна").

Приклад:

P = InputBox("Введіть значення розряду працюючого", " Розрахунок заробітної плати ")

Функція MsgBox. Ця функція призначена для виводу повідомлень у вигляді числа або текста у діалоговому вікні MsgBoxз ім’ям додатку який створював користувач.

Синтаксис функції MsgBoxтакий: MsgBox(“Значення для виводу даних”, число кнопок”, “Назва вікна для виводу”). Число кнопок у вікні повідомлення може бути 0,1,2.... Якщо 0 то буде одна кнопкаОК у вікні повідомлення, якщо 1 то буде дві кнопки ОК та Отмена, якщо 2 то буде: Прервать, Повтор, Пропустить. Треба уважно дивитись на кількість ком у аргументі функції, дужки не обов’язкові.

Приклади: MsgBox(“A = ”&A) або MsgBox(NPer), де NPer ім’я змінної, MsgBox "Заробітна плата (для Р*С<=8) становить" & z & " грн.".

4. Лінійні алгоритми та алгоритми що розгалужуються

Відомо, що обчислювальні процеси поділяються на три базові види: лінійні, розгалужені та циклічні. Тому ми і повинні і розглянути особливості їх програмування.

Програмування лінійних алгоритмів

У лінійному обчислювальному процесі всі операції виконуються послідовно у порядку їх запису. Всі оператори програми виконуються зліва направо й донизу. Прикладом лінійної програми є: програма обчислення вартості товару за формулою: Сума=Ціна*кількість де Ціна = С+П, С – собівартість продукції тобто витрати виробництва, П – прибуток.

Постановка задачі. Спроектувати додаток для розрахунку вартості товару, якщо відомо ціну одиниці товару - Ц, і кількість його одиниць - N.

И створення додатку:

1. Розроблення призначеного для користувача інтерфейсу.

2. Введення тексту програмного коду.

3. Виконання програми на ПК.

4. Збереження спроектованого додатку.

Розроблення інтерфейсу починається з розташування елементів керування на формі. На формі потрібно встановити 2 текстових елемента для введення даних і одне поле для виведення. Крім того потрібно зробити одне текстове поле для напису назви додатку і 3 пояснюючи написи для введення даних. До інтерфейсу слід додати кнопку керування рис.12.

Рисунок 12. Вікно інтерфейсу

Властивості елементів керування встановлюються згідно таблиці 4.

Таблиця 4. Значення властивостей елементів керування

Подвійним клацанням лівою клавішею миші на кнопці «Обчислити» відкривається вікно редактора коду, де відображається шаблон для процедури:

Private Sub CommandButton1_Click()

End Sub

Між цими операторами треба ввести код програми:

Dim Ціна As Currency

Dim Кількість As Integer

Ціна = Val(TextBox1.Text)

Кількість = Val(TextBox2.Text)

TextBox3.Text = Ціна * Кількість

Перші три оператори оголошують тип змінних. Наступні два оператори присвоюють змінним Ціна і Кількість значення, введені користувачем у перше та друге текстові поля та перетворюють введені дані в числові значення. Наступний оператор присвоює властивості Text третього поля результат перемноження змінних Ціна і Кількість із відображенням результату в третьому текстовому полі.

Запуск додатка виконується за допомогою кнопки Run. Введення даних виконується в перше та друге текстове поле. Обчислення виконується натисненням лівою клавішею миші на кнопці «Обчислити» .

Збереження проекту. Робота над проектом закінчується виконанням команди File ►Save.

4.2. Програмування алгоритмів що розгалужуються

Обчислювальний процес, що розгалужується, передбачає вибір одного з кількох можливих варіантів обчислень залежно від результату перевірки умови, яка має вигляд виразу логічного типу (наприклад: X>Y, 15<>30, (A>B) And (C<D), (A>B) Or (C<D), Not(x=0)).

Для вибору одного з кількох можливих варіантів обчислень залежно від результату перевірки умови використовують наступні оператори умовного переходу If... Then.... Else:

Однорядкова форма оператора

If умова Thenоператор 1[Else оператор 2],

де оператор1 та оператор 2 це любі оператори або можуть бути операторами умовного переходу (квадратні дужки вказують на те що оператор 2 не є обов’язковим).

Багаторядкова форма

If умова Then

послідовність операторів 1

Читайте також:

1. ADD KURS INTEGER,
2. Dim A(1 to 12) As Integer
3. Newspaper and Publicistic Styles
4. PUBLIC HOLYDAYS AND CELIBRATIONS
5. Static A As Integer

Переглядів: 694