Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
2 Курс Информатика VBA(ЗО) / Лабораторные работы / Лабораторный практикум VBA.doc
Скачиваний:
144
Добавлен:
31.05.2015
Размер:
813.57 Кб
Скачать

«Программирование разветвляющихся алгоритмов на языке vba»

Цель:Изучить основные методы программирования сложных функций с условиями на языкеVBA.

Краткие теоретические сведения

Оператор условного перехода задает выполнение определенных групп инструкций в зависимости от значения выражения.

Синтаксис: If condition Then [statements] [Else elsestatements]

Если условие condition принимает значение True, то выполняются инструкции statements, если False, то инструкции else statements. Ветвь Else является необязательной.

Допускается также использование блочной формы синтаксиса, которая часто упрощает восприятие оператора условного перехода. Обратите внимание на то, что при блочной организации оператора условного перехода используется ключевое слово End if для обозначения окончания оператора.

If condition Then

[statements]

[Else

(elsestatements)]

End If

Дерево условий может оказаться гораздо более сложным, чем просто проверка одного условия. В этом случае используется оператор if...Then...Elseif , который позволяет проверять множественные условия.

If condition-1 Then

[statements]

[Elself condition-2 Then

[elseifstatements]

[Else

[elsestatements]]

End If

Первым проверяется условие condition-1. Если оно имеет значение True, то выполняются инструкции statements и далее работа программы продолжит­ся со строки, которая следует за ключевым словом EndIf. Если условие condition-1 возвращает значение False, то проверяется условие condition-2 и т. д., пока не встретится условие, возвращающее значение True, или не встретится ключевое слово Else.

Построим в стандартном модуле пользовательскую функцию

Function Y(x)

If x < 0.5 Then

Y =(1 +Abs(0.2 – x))/(1+x+x^2)

Else

Y=x^(1/3)

End if

End Function

Ход работы

1.Запустить MS Excel

2.Нажать сочетание клавиш ALT+F11. Зайти в редактор VBA

3.Зайти в главное меню и выполнить команду ВСТАВИТЬ | МОДУЛЬ

4.Записать процедуру для расчета функции.

5.Сохранить книгу на диске.

6.Создать таблицу значений для функции и построить график. Если функция двух переменных, то график должен быть плоскостью.

7. Вариант задания выбрать из таблицы 9

Таблица 9 - Варианты заданий для выполнения лабораторной работы

Вариант

1

2

3

4

5

6

7

8

9

10

Функции

1,3,5

2,4,6

3,5,7

4,6,8

5,7,9

6,8, 10

7,9, 11

8,10, 12

9,11,1

10,12,4

8. По результатам выполнения лабораторной работы оформить отчет в редакторе MSWord. В который должно быть включено задание на работу, текст программы наVBA, и график полученной функции.

Задания для выполнения лабораторной работы:

1)на интервале.

2)на интервале.

3)на интервале.

4) Построить поверхность при

5)на интервале.

6)на интервале.

7)на интервале.

8)на интервале.

9) Построить поверхность при

10)на интервале.

11) Построить поверхность при

12)на интервале.

Лабораторная работа №3

«Программирование циклических алгоритмов на языке vba»

Цель :Изучить основные методы программирования циклических алгоритмов на языкеVBA.

Задание:

  1. Создать программу на языке VBA, согласно выбранному варианту.

  2. Сохранить книгу на диске А под именем Lab_rab_3