Dim p As Integer

Private Sub Command1_Click()

a = InputBox("Введите первую сторону треугольника")

b = InputBox("Введите вторую сторону треугольника")

c = InputBox("Введите третью сторону треугольника")

p = a + b + c

Debug.Print a, b, c, p

End Sub

Объявление

Dim

a

As

Integer

переводится так:

Переменная величина

a

как

целое число

то есть вы обязуете Visual Basic обращаться с переменной величиной a как с целым числом и ничем иным. Говорят, что "переменная a имеет тип Integer". Аналогично объявлены и переменные b, c, p. Объявления будем пока писать выше процедур. Подробнее о местах, где можно делать объявления, написано в 17.2.

Запустите проект. Проверьте его работу.

Вместо четырех строк

Dim a As Integer

Dim b As Integer

Dim c As Integer

Dim p As Integer

можно для краткости написать одну:

Dim a As Integer, b As Integer, c As Integer, p As Integer

Но если вы захотите написать еще короче:

Dim a, b, c, p As Integer

то Visual Basic неправильно вас поймет.

Типы данных

Много ли прав на нашем балу у барона Integer? Посмотрим. Попробуем ввести дробное значение первой стороны треугольника - 2,3. Именно так - с запятой, а не точкой. Посмотрим результат. Visual Basic считает a целым числом 2. А теперь - 2,6. Visual Basic считает a целым числом 3. Все правильно. Наш барон высокомерно отказывается быть дробным числом и поэтому любое число, которое мы ему предлагаем, округляет до целого.

Предположим, мы этим недовольны. Мы желаем, чтобы все числа могли быть дробными. Пожалуйста! Для этого достаточно всех гостей объявить князьями. Вот так: