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.


 

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

69049. Web-службы. Общие концепции Web-служб 236.5 KB
  Первоначально Web-серверы предоставляли статические данные, представленные в документах HTML и сопровождающих их файлах описания внешних таблиц стилей и сценариях, а также текстовых и мультимедийных данных, составляющих Web-страницу.
69050. Язык WSDL. Основные концепции языка WSDL 697.5 KB
  И отправитель, и получатель сообщения SOAP должны иметь доступ к описанию используемой Web-службы. Отправитель нуждается в описании Web-службы, чтобы знать, как правильно форматировать сообщение, а получатель – для правильной его интерпретации. Поэтому необходим документ (в виде файла)...
69051. Семантический Web. Развитие Web 512 KB
  Как и любая технология, WWW (World Wide Web – всемирная паутина) или просто Web (паутина) с момента своей первой демонстрации в 1991 году прошла большой путь развития. В 2005 году, чтобы отметить новые возможности Web, Тим О’Рейли (Tim O’Reilly), владелец издательства O’Reilly...
69052. Язык OWL (Web Ontology Language) 563 KB
  Язык онтологий для Web – OWL (Web Ontology Language), так же как RDF и RDFS разработан для описания данных и метаданных, а также отношений между ними и предназначен для использования в компьютерной обработке данных семантического Web.
69053. Общие компоненты технологии XML 176 KB
  Содержание документа на бумаге может быть сугубо текстовым, а также содержать изображения. Если документ представлен в электронном виде, он может содержать и мультимедийные данные, а также ссылки на другие документы. Хотя содержимое разных документов различно, их можно классифицировать по типам...
69054. Объявление типа документа 134 KB
  Определение типа документа DTD (Document Type Definition) является той основой, на которой создаются документы XML. DTD представляет собой набор правил, определяющий инструкции, которые могут быть переданы анализатору (parser) для обработки им этого документа.
69055. Формирование описания документа с помощью схем 271 KB
  Элемент age может быть проверен на принадлежность его содержимого заданному типу (PCDATA), поэтому содержимое обоих дескрипторов будет считаться правильным, т.е. при использовании DTD нельзя осуществить проверку как на соответствии определенному типу данных...
69056. Объявление атрибутов в схеме XML 187 KB
  Объявление атрибута обеспечивает локальную проверку значений атрибута, а также задание значения по умолчанию или фиксированного значения. Объявление атрибута выполняется с помощью элемента attribute, имеющего следующий формат...
69057. Обработка документов XML. Вспомогательные языки XML. Язык XPath 406 KB
  Язык XML предоставляет многообразные, гибкие и эффективные возможности описания структуры данных. Однако он не обеспечивает средств для навигации в документе и поиска компонент структурированных данных внутри документа, например, для поиска наименований книг по фамилии автора.