Главная Обратная связь

Дисциплины:

Архитектура (936)
Биология (6393)
География (744)
История (25)
Компьютеры (1497)
Кулинария (2184)
Культура (3938)
Литература (5778)
Математика (5918)
Медицина (9278)
Механика (2776)
Образование (13883)
Политика (26404)
Правоведение (321)
Психология (56518)
Религия (1833)
Социология (23400)
Спорт (2350)
Строительство (17942)
Технология (5741)
Транспорт (14634)
Физика (1043)
Философия (440)
Финансы (17336)
Химия (4931)
Экология (6055)
Экономика (9200)
Электроника (7621)


 

 

 

 



Технология выполнения работы. Содержание отчета Цель работы, условие задачи Алгоритм в виде блок-схемы



  1. Разработать алгоритм для написания программы в виде блок-схемы.
  2. Написать программу.
  3. Протестировать ее с разными исходными данными.

Содержание отчета

  1. Цель работы, условие задачи
  2. Алгоритм в виде блок-схемы.
  3. Исходный текст программы.
  4. Вводимые данные и результаты.
  5. Фрагменты экрана с диалоговыми окнами Excel.
  6. В программе значение одной из переменных должно быть записано в ячейке электронной таблицы.
  7. Значение другой переменной задается в программе или вводится с помощью окна-диалога.
  8. Все типы переменных и констант, которые используются в программе, должны быть объявлены и отражать смысловое значение переменных или констант.
  9. Результат работы программы должен иметь наглядный вид.
  10. Для запуска макроса создать кнопку с соответствующей надписью.

Вопросы для защиты работы

  1. Какие встроенные типы данных вы знаете?
  2. Как описываются переменные?
  3. Как объявляют константы?
  4. Какие операции языка VBA вы знаете?
  5. Какие операторы языка VBA вы знаете?
  6. Перечислите операторы управления
  7. Укажите операторы, используемые для ввода данных с рабочего листа.
  8. Как заменить Arcsin в VBA?
  9. Укажите формулу, которая заменит Arcctg в VBA.

Лабораторная работа № 13.

Условные алгоритмы

Время выполнения

1 час

Цель работы

Научиться использовать язык программирования Visual Basic for Applications (VBA) для разработки модулей в Excel на основе условных алгоритмов.

Задачи лабораторной работы

После выполнения данной работы студент должен знать и уметь:

  • знать все операторы, используемые в программах;
  • уметь применять любые из изученных операторов для написания своих модулей;
  • уметь объяснить написанную программу.

Перечень обеспечивающих средств

Для обеспечения выполнения работы необходимо иметь компьютер со следующим математическим обеспечением: операционная система Windows XP, электронные таблицы Excel с приложением в виде языка Visual Basic for Applications.

Общие теоретические сведения

VBA – это язык объектно-ориентированного программирования.

Основными парадигмами являются объект, свойство, метод, событие, класс и семейство объектов.

Объект – это инкапсуляция данных вместе с кодом, предназначенным для их обработки.

Семейство – объект, содержащий несколько других объектов того же типа.

Классы – это проект, на основе которого будет создан объект, т.е. класс определяет имя объекта, его свойства и действия, над ним выполняемые. А каждый объект, свою очередь, является экземпляром класса.

Методы – это действия, выполняемые над объектом.

Свойства – это атрибут объекта, определяющий его характеристики: размер, цвет, положение на экране или состояние (доступность, видимость).

События – это действия, распознаваемые объектом.

 

Пример 1.

Написать программу вычисления функции пользователя.

Предусмотреть сбойную ситуацию (при y = 0) и в этом случае выдать сообщение об ошибке.

 

Запись программы в виде блок-схемы (рис. 1) и визуальное представление ввода данных и вывода результата (рис. 2):

Рисунок 1. Блок-схема решения задачи

 

Программный код

Function z (x, y)

If y = 0 Then

z = "Ошибка! На ноль делить нельзя!"

ElseIf x > 0 And y > 1 Then

z = x + y

ElseIf x < = 1 And y <> 0 Then

z = x / y

End If

End Function

 

Рисунок 2. Ввод исходных данных в процессе выполнения программы

 

Пример 2.Написать программу вычисляющую значение Z

 

Программный код

Sub Условия()

Dim x, y, Z As Double

x = Range("A2").Value

y = Range("B2").Value

If x > 0.1 And y > 0.1 Then

Z = (x - y) ^ x

ElseIf x < 0.1 And y < 0.1 Then

Z = Sin(x)

ElseIf x = 0.1 And y = 0 Then

If y = 0 Then

MsgBox "Ошибка! Деление на ноль!"

Else: Z = (x * x) / y

End If

End If

Cells(2, 4).Value = Z

End Sub

 

Рассмотрим результат работы программы при разных значениях x и y (рис. 3, 4, 5).

Рисунок 3. Результат вычисления функции y= sin(x) при x<0.1 и y<0.1

 

Рисунок 4. Результат вычисления функции y= (x - y)x при x>0.1 и y>0.1

 

Рисунок 5. Результат вычисления функции y=x2/y при x=0.1 и y=0

Видеоурок по выполнению заданий лабораторной работы

 

Варианты заданий



Просмотров 583

Эта страница нарушает авторские права




allrefrs.su - 2025 год. Все права принадлежат их авторам!