Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Практическая работа №17(алгор).doc
Скачиваний:
3
Добавлен:
26.09.2019
Размер:
95.23 Кб
Скачать

Порядок выполнения работы:

  1. Изучите краткую теорию .

  2. Откройте приложение MS Excel.

  3. Выполните команду СервисàМакросРедактор Visual Basic или нажмите <Alt+F11>.

  4. Добавьте форму (команда Insert UserForm)

  5. Для выполнения примера №1

а)Разработайте пользовательский интерфейс, расположив на форме с помощью панели инструментов управления (ViewToolBox), следующие объекты управления: Label (Метка), TextBox (Текстовое поле), CommandButton (Командная кнопка).

б)В окне Properties (Свойства) для каждого объекта управления установить свойства, приведённые в таблице 2.

  1. Сделайте расчёты для трёх случаев

а) Удалите текстовое поле с именем «txtSummaSdelki» и в коде программы строку «S=Val(txtSummaSdelki.Text)»

б) На место удалённого объекта вставьте метку и именем «lblSummaSdelki» (обратите внимание, впереди стоит латинская буква «L» малая, а не «1 (единица)»)

в) На место удалённой строки в коде программы вставьте следующую запись:

S=InputBox(“Введите значение суммы сделки”)

lblSummaSdelki=Str(S)

  1. По введенному числу определить месяц и пору года. Результат выводить на форму в поле, при этом размерами его управлять программно в зависимости от результата.(использовать оператор Select Case.)

  2. Найдите площадь треугольника по формуле Герона. Программа должна проверять существование треугольника по введённым сторонам, и если он существует, то выводить его площадь, а в противном случае выводить сообщение о невозможности существования треугольника.

  3. Найти сумму двух наименьших из трёх положительных целых чисел, запрашиваемых у пользователя.

  4. Выполните пример №3.

  5. Вычислить значение функции на заданных интервалах, с указанным шагом изменения аргумента и выводом в текстовое или в список с шагом –10

  6. Оформите отчёт и сделайте вывод.

Литература.

  1. Пономарев В. Visual Basic.NET: – Экспресс-курс. – СПб.: BHV - Санкт - Петербург, 2003.-432с.

  2. Шевякова Д.А. Самоучитель Visual Basic 2008. СПб.: БВХ – Петербург,2008- 592с.

  3. Угринович Н.Д. Информатика и информационные технологии. Учебник для 10-11 классов- М.: БИНОМ. Лаборатория знаний, 2006.- 511с.

Составил : Титаренко С.А.