Порядок виконання роботи 3

Скласти проект, що дозволяє знайти максимальний елемент в одновимірному масиві.

№

Операції

Дії розробника

1.

Розробка інтерфейсу: Ескіз екранної форми буде вміщувати три командні кнопки: для введення значень елементів масиву, для отримання результату та для закінчення роботи додатку.

2.

Завантажити Visual Basic

>Пуск>Программы>Visual Basic

3.

Надати ім’я формі

Ввести до поля Name вікна властивостей значення FRMMas, до поля Caption значення Робота з масивом.

4.

Розташувати на формі об’єкти відповідно до ескізу інтерфейсу, враховуючи їх розмір та розміщення на ескізі, визначити властивості.

(Command Button На панелі елементів) – для розміщення кнопок керування

Для CommandButton

Name

Caption

CmdStart1

Введення масиву

CmdStart2

Max

CmdEnd

Вихід

5.

Наголошення масиву

>View Code, >(General на панелі елементів), вибрати у списку Declarations, декларувати масив як глобальну змінну:

Dim A(1 to 10) As Single

6.

Написати програмний код для командної кнопки CmdStart1.

Private Sub CmdStart1_Click()

FRMMas.Cls

For I=1 to 10

A(I)=Val(InputBox(“Введіть число”,”Введення масиву”)

Next I

‘Виведення масиву на форму для контролю

Print “Масив:”

For I=1 to 10

Print A(I)

Next I

End Sub

7.

Написати програмний код для командної кнопки CmdStart2.

Private Sub CmdStart2_Click()

Max=A(1)

For I=1 to 10

If A(I)>Max Then Max=A(I)

Next I

MsgBox Max, VbOKOnly+VbInformation, “Максимальне значення”

End Sub

8.

Написати програмний код для командної кнопки CmdEnd.

Private Sub CmdEnd_Click()

End

End Sub

9.

Налагодження програми. Запустити проект на виконання, якщо необхідно, виправити помилки

>►(Start) на панелі інструментів для початку роботи

>■ (End) на панелі інструментів або звертання до командної кнопки Вихід для завершення роботи

10.

Збереження проекту. Зберегти проект та форму у власній папці.

>Файл>Сохранить в меню або відповідна кнопка на панелі інструментів, вказати власну папку для збереження

11.

Створити виконавчий додаток.

>File >Make .exe, вказати власну папку для збереження, ввести і’мя MyProg4.

12.

Закрити вікно Visual Basic

>

13.

Завантажити проект MyProg4.Exe на виконання

> MyProg4.Exe у власній папці