Стандартные математические функции.

Математические функции (углы выражаются в радианах):

Функция Visual Basic .NET	Описание
Abs(x)	Возвращает абсолютное значение заданного числа x
Atan(x)	Возвращает значение arctg x типа Double
Cos(x)	Возвращает значение cos x типа Double
Exp(x)	Возвращает значение типа Double, равное числу е(основание натуральных логарифмов) в заданной степени x
Log(x)	Возвращает значение типа Double, равное натуральному логарифму заданного числа x. Может возвращать и логарифм числа x по заданному основанию
Round(x)	Возвращает значение типа Double, равное ближайшему к заданному числу x целому значению
Sign(x)	Возвращает значение (1, 0, -1)типа Integer, указывающее знак числа
Sin(x)	Возвращает значение типа Double, равное sin x
Sqrt(x)	Возвращает значение типа Double, равное квадратному корню числа x
Tan(x)	Возвращает значение типа Double, равное tg x
Int(x)	Целая часть
Fix(x)	Целая часть
Rnd	Случайное число

Чтобы воспользоваться этими функциями, не указывая их полное наименование, в

проекте необходимо выполнить импорт пространства имен System.Math, добавив в

начало исходного кода строку Imports System.Math.

Обе функции Int и Fix отбрасывают дробную часть числа и возвращают

значение типа, совпадающего с типом аргумента. Различие между функциями Int и Fix

состоит в том, что для отрицательного значения аргумента число функция Int

возвращает ближайшее отрицательное целое число, меньшее либо равное указанному, а

Fix ближайшее отрицательное целое число, большее либо равное указанному. Например,

функция Int преобразует -8.4 в -9, а функция Fix преобразует -8.4 в -8.

Функция Rnd возвращает значение типа Single, содержащее случайное число,

меньшее 1 и большее или равное нулю. Перед первым вызовом функции Rnd надо использовать инструкцию Randomize без аргумента для инициализации генератора случайных чисел.

Для получения случайных целых чисел в заданном диапазоне используйте следующую формулу:

К оглавлению CInt(Int((ВерхнееЗначение - НижнееЗначение _+ 1) * Rnd() + НижнееЗначение))
10) Инструкция присвоения, функции InputBox и MsgBox.

Для ввода значения переменной можно воспользоваться функцией InputBox. Она

выводит на экран диалоговое окно, содержащее сообщение и поле ввода, а также

возвращает значение типа String, содержащее текст, введенный в поле ввода.

Упрощенный синтаксис обращения к функции:

InputBox(Сообщение[,Заголовок])

У этой функции первый слева аргумент обязательный, а второй – необязательный.

Назначение аргументов:

Сообщение – выражение типа String, отображаемое в диалоговом окне;

Заголовок – выражение типа String, отображаемое в строке заголовка диалогового

окна;

Пример:

Label1.Text = InputBox(“Пожалуйста, введите Ваше имя”)

В этой инструкции присвоения вызывается функция InputBox. Эта функция

выводит диалоговое окно с запросом-подсказкой на ввод данных пользователем.

Значение аргументафункции InputBox выведено ввиде запроса-подсказки в окне

функции InputBox. Значением функции InputBox будет строка символов, которую пользователь наберет в поле окна функции InputBox. Это возвращаемое

значение функцией InputBox присваивается свойству Text надписи Label2.

Для вывода значения некоторого выражения может быть применена функция

MsgBox. Для этого следует обратиться к этой функции, пользуясь, например,

упрощенным синтаксисом:

MsgBox (Сообщение [, , Заголовок])

Здесь Сообщение – это выражение, которое будет преобразовано в строку

символов и выведено в окне MsgBox, а Заголовок – строка символов, отображаемая в

заголовке этого окна.

Пример:

Dim i As Integer = 5

MsgBox("i= " & i, , _

"Вывод переменной i")

Инструкция выбора If.

Наиболее часто для программирования разветвлений используется

инструкция If ... End If

Эта инструкция может иметь однострочный или блочный синтаксис.

Однострочный синтаксис.

If Условие Then Инструкция1 [Else Инструкция2]

Здесь If (если), Then (то) и Else (иначе) - зарезервированные слова. Функционирование

этой инструкции относительно просто. Если записанное после If условие истинно, т.е.

результат равен True, то выполняется Инструкция 1, указанная за Then. Если же

результат равен False, то выполняется Инструкция 2, следующая за ключевым словом

Else, если такая имеется. Например:

If a = 7 Then Beep

If x < 9 Then MsgBox("False!") Else MsgBox("True!")

Первая строка задает подачу звукового сигнала, если переменная a равна 7. Во второй

строке в окне функции MsgBox выводится текст False!, если значение переменной x

меньше 9. В противном случае выводится текст True!.

Существенно, что после слова Then, а также после слова Else может находиться

несколько операторов, отделенных друг от друга двоеточием. В этом случае такая

последовательность операторов является одной группой, которая либо выполняется, либо

пропускается в зависимости от управляющего условия.

Пример:

Dim a As Boolean = False, b As Integer

If a Then b = b + 1 : b = b + 1 : b = b + 1

Console.WriteLine(b)

В этом примере переменная b получит значение 0. Если бы переменная a была равна

True, то переменная b получила бы значение 3.

Блочный синтаксис.

If Условие Then

[Инструкции 1]

[ElseIf УсловиеN Then

[Инструкции N]

Else

[Инструкции 2]]

End If

Если в зависимости от условия необходимо выполнить не простую команду, а группу

инструкций, следует использовать блочный синтаксис. Это относится и к ветви Else.

Кроме того, блочная структура с ElseIf позволяет анализировать несколько условий:

If A = 7 Then

Beep

End If

If Name = "Иванов" Then

MsgBox("Ваша карточка удерживается!")

Else

MsgBox("Получите деньги, пожалуйста!")

End If

If Обращение = 1 Then

MsgBox("Здравствуйте, господин")

ElseIf Обращение = 2 Then

MsgBox(" Здравствуйте, госпожа")

Elself Обращение = 3 Then

MsgBox(" Здравствуйте, дамы и господа")

Else

MsgBox("Здравствуйте, люди")

End If