Студопедия — End Select. Переменная S получит значение
Студопедия Главная Случайная страница Обратная связь

Разделы: Автомобили Астрономия Биология География Дом и сад Другие языки Другое Информатика История Культура Литература Логика Математика Медицина Металлургия Механика Образование Охрана труда Педагогика Политика Право Психология Религия Риторика Социология Спорт Строительство Технология Туризм Физика Философия Финансы Химия Черчение Экология Экономика Электроника

End Select. Переменная S получит значение

110..145: S:= ‘Ребенок’;

146..180: S:= ‘Средний рост’;

180..210: S:= ‘Высокий рост’

Else S:= ‘Ошибка’

end;

переменная S получит значение

· Ошибка

· Ребенок

· Высокий рост *

 

 

ЗАДАНИЕ

1. Получите вариант задания у преподавателя.

Пример задания, рассмотренный в лекции.

 
 

 

 


2. По условию задачи разработайте алгоритм решения задачи.

 

3. По условию задачи разработайте Пользовательскую Форму. Для ввода X на Форме разместите поле TextBox, для вывода результатов надпись - Label. Пример Формы по материалам лекций приведен на рис.1.

а) b)

 

Рис.1. Пример Формы для решения задачи Выбор формулы решения.

а) Флажок «Выводить условие» сброшен. в) Флажок «Выводить условие» установлен.

 

На Форме предусмотрен Объект – Флажок, который используется для вывода текста условия выбора формулы или для отмены этого вывода.

На Форме предусмотрено две кнопки. Кнопка «Вычислить» запускает программу выбора формулы решения. Кнопка «Отмена» –закрывает (скрывает) Форму.

4. Напишите процедуру обработки события – щелчка мышью по кнопке «Вычислить»

А) Вычислить вначале с использованием оператора

If условие Then операторы Else операторы

или

If условие Then

Операторы 1

Else

Операторы 2

End if

Напишите программу и выполните.

В) Затем замените фрагмент программы с if на фрагмент с оператором Case.

Select Case переменная (или выражение)

Case значение переменной(выражения)

Операторы 1

Case значение переменной(выражения)

Операторы 2

Case значение переменной(выражения)

Операторы 3

End Select

5. Напишите программу обработки события - щелчка мышью по кнопке «Отмена».

 




<== предыдущая лекция | следующая лекция ==>
CaseDayOfWeek(Date) of | РАЗВЕТВЛЯЮЩИЙСЯ ВЫЧИСЛИТЕЛЬНЫЙ ПРОЦЕСС

Дата добавления: 2015-10-02; просмотров: 372. Нарушение авторских прав; Мы поможем в написании вашей работы!



Шрифт зодчего Шрифт зодчего состоит из прописных (заглавных), строчных букв и цифр...

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

Практические расчеты на срез и смятие При изучении темы обратите внимание на основные расчетные предпосылки и условности расчета...

Функция спроса населения на данный товар Функция спроса населения на данный товар: Qd=7-Р. Функция предложения: Qs= -5+2Р,где...

Прием и регистрация больных Пути госпитализации больных в стационар могут быть различны. В цен­тральное приемное отделение больные могут быть доставлены: 1) машиной скорой медицинской помощи в случае возникновения остро­го или обострения хронического заболевания...

ПУНКЦИЯ И КАТЕТЕРИЗАЦИЯ ПОДКЛЮЧИЧНОЙ ВЕНЫ   Пункцию и катетеризацию подключичной вены обычно производит хирург или анестезиолог, иногда — специально обученный терапевт...

Ситуация 26. ПРОВЕРЕНО МИНЗДРАВОМ   Станислав Свердлов закончил российско-американский факультет менеджмента Томского государственного университета...

В теории государства и права выделяют два пути возникновения государства: восточный и западный Восточный путь возникновения государства представляет собой плавный переход, перерастание первобытного общества в государство...

Закон Гука при растяжении и сжатии   Напряжения и деформации при растяжении и сжатии связаны между собой зависимостью, которая называется законом Гука, по имени установившего этот закон английского физика Роберта Гука в 1678 году...

Характерные черты официально-делового стиля Наиболее характерными чертами официально-делового стиля являются: • лаконичность...

Studopedia.info - Студопедия - 2014-2024 год . (0.011 сек.) русская версия | украинская версия