Математичні функції VB

Типи даних в VB

Integer	Ціле
Long Integer	Довге ціле
Single	Одинарної точності з плаваючою комою
Double precision	Подвійної точності з плаваючою десятковою точкою
String	Рядковий
Boolean	Логічний
Date	Дата
Variant	Варіант
Currency	Грошовий

У наступному прикладі розглянемо статичні та нестатичні змінні. Статична змінна А при кожному клацанні на кнопці Command1 збільшується на одиницю. Нестатична змінна В при кожному клацанні ініціалізується заново, тому її значення на виході 1.

Щоб оголосити статичними всі локальні змінні процедури, варто записати ключове слово Static у заголовку процедури.

Private Sub Command1_Click()

Static a As Integer

Dim b As Integer

a = a + 1

b = b + 1

Print a

Print b

End Sub

Приклад: Підрахуємо суму цифр тризначного числа.

Private Sub Command1_Click()

Dim a As Integer

a = Val(Text1.Text)

a1 = a \ 100

Print " перше число="; a1

a2 = (a - a1 * 100) \ 10

Print "друге число= "; a2

a3 = a Mod 10

Print "третє число = "; a3

s = a1 + a2 + a3

Print "сума = "; s

End Sub

Функція	Дія
Abs(n)	Повертає абсолютне значення n
Atn(n)	Повертає арктангенс n в радіанах
Cos(n)	Повертає значення косинуса n
Exp(n)	Повертає константу е в степені n
Rnd(n)	Генерує випадкове число між 0 і 1
Sin(n)	Повертає значення синуса n
Sqr(n)	Повертає квадратний корінь n
Str(n)	Перетворить числове значення в рядок
Tan(n)	Повертає значення тангенса n
Val(n)	Перетворить рядок в числове значення
Log(n)	Натуральний логарифм. Десятковий логарифм Log(n)/Log(10)

Дата добавления: 2014-12-27