49.Встроенные функции vb.

Встроенные функции VB обеспечивают сложные виды обработки данных, избавляя пользователя от разработки собственных программ. В VB используется несколько категорий встроенных функций. Это — математические, строковые, функции даты и времени, функции преобразования типов и файловые. При обращении к этим функциям необходимо указать идентификатор функции, а в скобках аргумент. Приоритет вычисления функций выше, чем у арифметических операций.

Математические:

Abs(x) - |x|

Atn(x) – arctg x

Sin(x) – sin x

Cos (x) – cos x

Tan(x) – tg x

Exp(x) - (e – основание натурального логарифма)

Log(x) – ln x

Sqr(x) – квадратный корень

Rnd(x) – датчик случайных чисел

Fix(x) – отбрасывание дробной части

Int(x) – наибольшее целое число, не превосходящее Х

Round(x [, A]) – округление числа Х, с точностью до А десятичных знаков; если параметр А не задан, то происходит округление до целого значения

Sgn(x) – возвращает +1, если значение аргумента положительное, -1, если отрицательное и 0, если -0

Строковые:

Len(Str$) — определение длины строки; Left(Str$,x) — выделение из строки х символов слева;

Right(Str$,x) — выделение из строки х символов справа;

Mid(Str$,x,y) — выделение из строки у символов начиная с номера х.

Функции преобразования типов:

Val(Str$) — преобразует строковое значение в число;

Str(x) — преобразует число в строковое значение;

Chr(x) — преобразует числовой код в символ;

Chr( 13) — перевод каретки;

Chr( 10) — переход на начало строки.

50.Запись арифметических выражений в vb. Приоритет операций.

Арифметическое выражение – это последовательность чисел, констант, переменных, функций и арифметических выражений, заключённых в круглые скобки, которые соединены между собой знаками арифметических операций. Таких операций 8. Вычисления производятся в соответствии с приоритетом:

1) А^B;

2) –A;

3)A*B, A/B;

4)A\B;

5)A Mod B;

6)A+B, A-B.

Для операции 34\5 результат равен 6, а для (34 mod 5) результат 4. Взятие стандартной функции имеет наивысший приоритет. Чтобы изменить последовательность выполнения операций используют круглые скобки.

51.Программирование линейного вычислительного процесса. Пример вычисления по формуле.

Текст программного модуля:

Private Sub Форма1_Click()

Dim X As Single, Y As Double

X = Val(Текст1)

Y = 1.736 * Abs(Log(Tan(X / 2))) - Sqr(Atn((Exp(X) - Exp(-X)) / 2))

Текст2 = Str(Y)

End Sub

52.Разработка приложения «калькулятор».

Текст программы:

Private Sub CommandButton1_Click() ‘сложение

Dim chislo1 As Single, chislo2 As Single, rez As Single

chislo1 = Val(TextBox1.Text)

chislo2 = Val(TextBox2.Text)

rez = chislo1 + chislo2

TextBox3.Text = rez

End Sub

Private Sub CommandButton2_Click() ‘вычитание

Dim chislo1 As Single, chislo2 As Single, rez As Single

chislo1 = Val(TextBox1.Text)

chislo2 = Val(TextBox2.Text)

rez = chislo1 - chislo2

TextBox3.Text = rez

End Sub

Private Sub CommandButton3_Click() ‘умножение

Dim chislo1 As Single, chislo2 As Single, rez As Single

chislo1 = Val(TextBox1.Text)

chislo2 = Val(TextBox2.Text)

rez = chislo1 * chislo2

TextBox3.Text = rez

End Sub

Private Sub CommandButton4_Click() ‘деление

Dim chislo1 As Single, chislo2 As Single, rez As Single

chislo1 = Val(TextBox1.Text)

chislo2 = Val(TextBox2.Text)

rez = chislo1 / chislo2

TextBox3.Text = rez

End Sub