Ознайомлення з середовищем VBA. Вивчення вбудованих функцій

Страницы работы

Содержание работы

МІНІСТЕРСТВО ОСВІТИ І НАУКИ  УКРАЇНИ

ХАРКІВСЬКИЙ НАЦІОНАЛЬНИЙ УНІВЕРСИТЕТ РАДІОЕЛЕКТРОНІКИ

Кафедра ПЗЕОМ

ЗВІТ

з лабораторної работи №1

на тему: «ОЗНАЙОМЛЕННЯ З СЕРЕДОВИЩЕМ VBA. ВИВЧЕННЯ ВБУДОВАНИХ ФУНКЦІЙ»

з дисципліни «Інформатика»

Виконала:                                                                    Перевірив:

ст. гр. ВПС-08-2                                                         Новіков Ю.С.

Нанiвська К. О.                                                         

Харків 2010

1 ОЗНАЙОМЛЕННЯ З СЕРЕДОВИЩЕМ VBA. ВИВЧЕННЯ ВБУДОВАНИХ ФУНКЦІЙ

1.1  . Мета роботи:

Ознайомлення з середовищем VBA та основними функціями побудови макрокоманд у Microsoft Office 2007. Набуття практичних навичок розробки макрокоманд мовою VBА (Visual Basic for Applications), з використанням вбудованих функцій.

1.2  . Хід роботи

1.  Опрацювали теоретичний матеріал до лабораторної роботи.

2.  Завантажили додаток MS OFFICE.

3.  Виконали завдання на лабораторну роботу пункти 1-9. 

4.  Зберегти виконаний файл.

5.  Оформити звіт.

1.3. Завдання до лабораторної роботи

1.  Розмістити на формі наступні елементи:

Label1;

TextBox1;

CommandButton1.

2.  Активізувати Label1, у вікні властивостей знайти властивість Caption та змініть Label1 на назву факультету.

3.  Ті ж дії  провести з  CommandButton1, змінюючи  Caption на  - ОК.

4. Активізувати TextBox1 та змінити властивість Text на назву в групи.

5.  За допомогою елементу Выбор объекта видіти усі елементи на формі. У вікні властивостей можна роздивитись які з властивостей однакові для всіх елементів. Змінюючи властивість Font (полужирный, курсив, розмір шрифту 15), Back Color (світла тінь для кнопки), Visible(False), прослідкувати всі зміни елементів управління на формі.

6.  Здійснити запуск програми за допомогою кнопки Запуск на панелі інструментів або меню Запуск>Запуск программы.

7.  Повернутися у режим конструктора VBA.

8.  Виділити усі об’єкти та змінити тільки властивість Visible (True) та знову здійснити запуск програми.

9.  Самостійно змінити інші властивості елементів цієї форми та  зафіксувати їх зміни.

1.4. Виконання роботи

Код:

Private Sub CommandButton1_Click()

TB3.Text = Val(TB1.Text) + Val(TB2.Text)

End Sub

Private Sub CommandButton2_Click()

TB3.Text = Val(TB1.Text) * Val(TB2.Text)

End Sub

Private Sub CommandButton3_Click()

If TB2.Text = "" Then MsgBox "!!!Невозможно!!!"

If TB2.Text = 0 Then MsgBox "!!!Навозможно!!!"

If TB2 = 0 Then TB3.Text = "" Else TB3.Text = Val(TB1.Text) \ Val(TB2.Text)

End Sub

Private Sub CommandButton4_Click()

TB3.Text = Val(TB1.Text) - Val(TB2.Text)

End Sub

Private Sub CommandButton5_Click()

If TB2.Text = "" Then MsgBox "!!!Невозможно!!!"

If TB2.Text = 0 Then MsgBox "!!!Невозможно!!!"

If TB2 = 0 Then TB3.Text = "" Else TB3.Text = Val(TB1.Text) / Val(TB2.Text)

Похожие материалы

Информация о работе

Предмет:
Информатика
Тип:
Отчеты по лабораторным работам
Размер файла:
224 Kb
Скачали:
0