17032

Використання операторів умов в Visual BASIC

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

Информатика, кибернетика и программирование

Лабораторна робота №10 Тема: Використання операторів умов Мета: відробити прийоми використання оператори умов в Visual BASIC 6.0 . Обладнання: ПК ПЗ VB 6.0 Хід роботи Індивідуальне завдання. Знайти значення функції використавши вікно повідомлень для вводу та виводу ...

Украинкский

2013-06-29

41.5 KB

1 чел.


Лабораторна робота №10

Тема: Використання операторів умов

Мета: відробити прийоми використання оператори умов в Visual BASIC 6.0 .

Обладнання: ПК, ПЗ VB 6.0

Хід роботи

Індивідуальне завдання.

Знайти значення функції, використавши вікно повідомлень для вводу та виводу даних.

Варіант 19     

Листинг:

Private Sub Image1_Click()

End Sub

Private Sub Command1_Click()

Dim x As Double, y As Double

x = Val(InputBox("Ââåäèòå x", "window"))

If x < 0 Then

   y = Cos(2 - x)

ElseIf x >= 0 And x <= 1 Then

   y = Log(Exp(x - 1)) / Log(4)

Else

   y = Cos(x) / Sin(x)

End If

MsgBox ("y=" & y)

End Sub

Контрольні питання.

  1.  Використання оператора If.
  2.  Використання оператора Select Case.
  3.  Oператори MsgBox, InputBox.


 

А также другие работы, которые могут Вас заинтересовать

16587. ИОНИЗИРУЮЩИЕ ИЗЛУЧЕНИЯ И ОКРУЖАЮЩАЯ СРЕДА 131.5 KB
  Лабораторная работа №5 ИОНИЗИРУЮЩИЕ ИЗЛУЧЕНИЯ И ОКРУЖАЮЩАЯ СРЕДА 4.1. Радиоактивность и виды ионизирующих излучений Радиоактивность это способность ядер некоторых химических элементов самопроизвольно распадаться с образованием ядер новых химических элементов...
16588. Изучение результатов искусственного отбора 2.35 MB
  Лабораторная работа № 6 Тема: Изучение результатов искусственного отбора Цель: выявить черты сходства и различия сортов растений как результат реализации задач поставленных человеком в ходе искусственного отбора. Оборудование: муляжи различных сортов яблок гр
16589. Митоз в клетках корешков лука 382 KB
  Лабораторная работа № 4 Тема: Митоз в клетках корешков лука Цель работы: выявить отличительные особенности стадий митотического деления клеток. Оборудование: микроскоп спиртовка микропрепарат Митоз в клетках корешков лукафильтровальная бумагапрепарова
16590. Изучение приспособленности организмов к среде обитания 394.5 KB
  Лабораторная работа № 7 Тема: Изучение приспособленности организмов к среде обитания Цель: выяснить механизм образования приспособлений к среде обитания и их относительный характер сделать вывод о том что приспособленность результат действия естественного о
16591. Каталитическая активность ферментов в живых клетках 38 KB
  Лабораторная работа № 9 Тема: Каталитическая активность ферментов в живых клетках Цель: выявить каталитическую функцию белков в живых клетках сформировать знания о роли ферментов в клетках закрепить умение работать с микроскопом проводить опыты и объяснять резу...
16592. Изучение фенотипов местных сортов растений 55.5 KB
  Лабораторная работа № 12 Тема: Изучение фенотипов местных сортов растений Цель: расширить знания о задачах современной селекции. Оборудование: пакетики семян различных сортов томатов два экземпляра натуральных или гербарных образцов злаковых растений одного ...
16593. Сравнение строения тканей многоклеточных организмов (на примере: растений, грибов, животных и человека).Типы тканей и их функции 1.21 MB
  Лабораторная работа № 3 Тема: Сравнение строения тканей многоклеточных организмов на примере: растений грибов животных и человека.Типы тканей и их функции. Ткань это группа клеток и межклеточное вещество объединенные общим строением функцией и происхождение...
16594. Строение половых клеток. Изучение мейоза в пыльниках цветковых растений 697.5 KB
  Лабораторная работа № 5 Тема: Строение половых клеток. Изучение мейоза в пыльниках цветковых растений. Цель работы: выявить отличительные особенности строения половых клеток. Увидеть на препаратах процесс деления наследственного материала хромосом во время фор
16595. СОВРЕМЕННЫЕ МОЛОДЕЖНЫЕ ПРОГРАММЫ НА ТЕЛЕВИДЕНИИ КРАСНОДАРСКОГО КРАЯ: ПОИСК ОПТИМАЛЬНОЙ МОДЕЛИ 1.79 MB
  Термином «молодежные программы» часто определяются передачи, предназначенные для молодежной аудитории. Но для того, чтобы понять реальные телеинтересы и телепотребности нынешних молодых телезрителей, попробуем разобраться в особенностях молодежной аудитории