Вопрос 7. Типы данных. Примеры

Тип	Название типа	Значение
Boolean	Логический	True, False
Byte	Байтовый	0... 255
Integer	Целое	-32768... +32767
Long	Длинное целое	-2147483648... [phone]
Single	Число с плавающей точкой	для отрицательных значений: -3,402823*10^38...-1,401298*10^-45 для положительных значений: 1,401298*10^-45...3,402823*10^38
Double	Число с плавающей точкой двойной точности	для отрицательных значений: -1,79769313486232*10^308...-4,94065645841247^-324 для положительных значений: 4,94065645841247*10^-324...1,79769313486232*10^308
Currency	Денежный	Десятичные числа с фиксированной позицией запятой. Возможны 15 цифр до запятой и 4 после. от -922337203685477,5808 до 922337203685477,5807
String	Строковый	Хранение текста длиной до 2 млрд. символов. Есть два вида строк: строки фиксированной длины (до 2^16символов) и строки переменной длины (до 2^31 символов). Данные записываются в кавычках.
Date	Дата	Даты изменяются в диапазоне от 1.01.100г. до 31.12.9999г. Время от 00:00:00 до 23:59:59
Object	Объект	Ссылка на объект (указатель)
Variant	Вариант	Универсальный тип, значением которого могут быть данные любого из перечисленных выше типов, объекты, значения NULL и значения ошибок ERROR.

*Желтым выделены использованные типы данных в курсе « программирование»

Dim r As Byte

Dim - это оператор R - это переменная As - это часть нашего синтаксиса Byte - это тип данных, который и описывает нашу переменную.

8.Управляющие конструкции If…Then и Select…Case. Примеры

Управляющие структуры позволяют управлять последовательностью выполнения программы. Без операторов управления все операторы программы будут выполняться слева направо и сверху вниз. Однако иногда требуется многократно выполнять некоторый набор инструкций автоматически, либо решить задачу по-другому в зависимости от значения переменных или параметров, заданных пользователем во время выполнения. Для этого служат конструкции управления и циклы.

If условие Then выражение

If условие Then

выражение

End If

Конструкция Select Case является альтернативой конструкции If . . . Then . . . Else в случае выполнения блока, состоящего из большого набора операторов. Конструкция Select Case предоставляет возможность, похожую на возможность конструкции If . . . Then . . . Else, но в отличие от нее она делает код более читаемым при наличии нескольких вариантов выбора.

Sub chislo()

Dim t As Integer

t = InputBox("Введите число")

Select Case t

Case 0

MsgBox ("Введен О")

Case Is > 0

MsgBox ("Введено положительное число")

Case Is < 0

MsgBox ("Введено отрицательное число")

Case Is < -100, Is > 100

MsgBox ("Число слишком большое, не понять")

Case Else

MsgBox ("Введено не число")

End Select

End Sub

9) Операторы цикла For…Next и Do…Loop. Особенности использования. Примеры

а) For…Next

Части

Часть	Описание
counter	Требуется в операторе For. Числовая переменная. Управляющая переменная цикла. Дополнительные сведения см. в подразделе Аргумент счетчикадалее в этом разделе.
datatype	Необязательный параметр. Тип данных counter. Дополнительные сведения см. в подразделе Аргумент счетчика далее в этом разделе.
start	Обязательное. Числовое выражение. Начальное значение counter.
end	Обязательное. Числовое выражение. Конечное значение counter.
step	Необязательный параметр. Числовое выражение. Шаг, с которым counter увеличивается при каждом прохождении цикла.
statements	Необязательный параметр. Одно или несколько выражений между For и Next, выполняемых указанное число раз.
Continue For	Необязательный параметр. Передает управление следующей итерации цикла.
Exit For	Необязательный параметр. Передает управление из цикла For.
Next	Обязательное. Завершает определение цикла For.

Простые примеры

Используется структура For…Next, когда требуется выполнить набор выписок задать количество раз.

В следующем примере запускается приложение переменной index со значением 1 и инкрементированы с каждой итерацией цикла, конечный после значение indexдостигает 5.

For index As Integer = 1 To 5

Debug.Write(index.ToString & " ")

Next

Debug.WriteLine("")

' Output: 1 2 3 4 5

Вложенные циклы.

Циклы For могут вкладываются друг в друга. В следующем примере демонстрируются вложенные структуры For...Next с разными значениями шага. Внешний цикл создает строку для каждой итерации цикла. Внутренний цикл уменьшает переменную счетчика цикла с каждой итерацией цикла.

For indexA = 1 To 3

' Create a new StringBuilder, which is used

' to efficiently build strings.

Dim sb As New System.Text.StringBuilder()

' Append to the StringBuilder every third number

' from 20 to 1 descending.

For indexB = 20 To 1 Step -3

sb.Append(indexB.ToString)

sb.Append(" ")

Next indexB

' Display the line.

Debug.WriteLine(sb.ToString)

Next indexA

' Output:

' 20 17 14 11 8 5 2

' 20 17 14 11 8 5 2

' 20 17 14 11 8 5 2

Если циклы вложения, каждый цикл должны иметь уникальный переменную counter.

б) Do…Loop

Используется структура Do...Loop, если требуется повторение набора инструкций неограниченное число раз, пока условие выполняется. Если вы хотите повторить инструкцию определенное количество раз, то For...Next Statement обычно является лучшим выбором.

While или Until можно использовать для указания condition, но не оба одновременно.

Можно проверить condition только один раз — в начале или в конце цикла. Если проверить condition в начале цикла (в инструкции Do), цикл может никогда не выполниться, даже один раз. Если проверить в конце цикла (в инструкции Loop), цикл всегда выполняется по крайней мере один раз.

Условие обычно является результатом сравнения двух значений, но оно может быть любым выражением, значение которого при вычислении имеет тип Тип данных Boolean (Visual Basic) (True или False). Сюда же относятся значения других типов данных, например, числовых типов, преобразованные в тип Boolean.

Циклы Do могут вкладываться друг в друга. Также можно вложить друг в друга различные виды управляющих структур. Дополнительные сведения см. в разделеВложенные структуры управления (Visual Basic).

Части

Термин	Определение
Do	Обязательное. Начало определения цикла Do.
While	Требуется, если не используется Until. Повторяет цикл до тех пор, пока condition не станет равно False.
Until	Требуется, если не используется While. Повторяет цикл до тех пор, пока condition не станет равно True.
condition	Необязательный параметр. Выражение Boolean. Если condition равно Nothing, Visual Basic обрабатывает его как False.
statements	Необязательный параметр. Один или несколько операторов, повторяемых, пока condition равно или пока не станет равно True.
Continue Do	Необязательный параметр. Элемент управления перенаправления к следующей итерации цикла Do.
Exit Do	Необязательный параметр. Передача управления из цикла Do.
Loop	Обязательное. Завершение определения цикла Do.

Пример

В следующем примере инструкции в цикле выполняются до тех пор, пока значение переменной index остается больше 10. ПредложениеUntil завершает цикл.

Dim index As Integer = 0

Do

Debug.Write(index.ToString & " ")

index += 1

Loop Until index > 10

Debug.WriteLine("")

' Output: 0 1 2 3 4 5 6 7 8 9 10

В следующем примере используется оператор While вместо Until , и condition проверяется в начале цикла, а не в конце.

VB

Dim index As Integer = 0

Do While index <= 10

Debug.Write(index.ToString & " ")

index += 1

Loop

Debug.WriteLine("")

' Output: 0 1 2 3 4 5 6 7 8 9 10

В следующем примере условие condition останавливает цикл, когда переменная index больше 100. Оператор If в цикле, однако, вызывает инструкцию Exit Do , чтобы остановить цикл, когда переменная index больше 10.

Dim index As Integer = 0

Do While index <= 100

If index > 10 Then

Exit Do

End If

Debug.Write(index.ToString & " ")

index += 1

Loop

Debug.WriteLine("")

' Output: 0 1 2 3 4 5 6 7 8 9 10