Знаки типов
Использование в качестве аргументов процедур и функции имен форм и элементов управления
Инструкция With
Инструкция With позволяет указывать объект только один раз для последовательности инструкций. Инструкция With ускоряет выполнение процедур и помогает избежать повторного задания имени объекта.
Command1.Caption = “Вычислить”
Command1.Font.Bold = True
Command1.Visible = False
С применением инструкции With этот программный код следовало бы записать так:
With Command1
.Caption = “Вычислить”
.Font.Bold = True
.Visible = False
End With
Для увеличения эффективности программы возможно создание вложенных инструкций With. Это показывает следующий пример.
Command1.Caption = “Вычислить”
Command1.Font.Name = "Arial"
Command1.Font.Bold = True
Command1.Font.Size = 15
Command1.Visible = False
Эквивалентный по результату действия программный код:
With Command1
.Caption = “Вычислить”
With .Font
.Name = "Arial"
.Bold = True
.Size = 15
End With
.Visible = False
End With
Список аргументов процедур и функций может включать имена форм и элементов управления (в качестве описателей типа для них применяются соответственно Form и Control). Это позволяет создавать универсальные алгоритмы для работы с формами и управляющими элементами. Например, для привлечения внимания пользователя к одной из надписей формы можно создать одну универсальную процедуру, изменяющую шрифт и его цвет:
Sub Внимание (lbl As Control)
lbl.FontItalic = True
lbl.ForeColor = vbRed
End Sub
Аргументом процедуры является имя надписи. Обращение к данной процедуре с указанием в качестве значения имени какой-либо конкретной надписи приведет к изменению ее шрифта и цвета.
Указывать название типа данных при объявлении не обязательно. Тип данных при объявлении может устанавливаться просто добавлением знака типа в конце имени переменной.
Знаки типов переменных:
| Тип переменной | Знак типа | Пример |
| Integer | % | a% |
| Long | & | sum& |
| Single | ! | sigma! |
| Double | # | b# |
| Currency | @ | betta@ |
| String | $ | x$ |
Примеры объявлений переменных со знаками типов:
Dim Отчество$
Dim Процент@
Dim Счетчик%
Не все типы данных имеют собственные знаки. Применение знаков для объявления типов – устаревшая традиция, применение которой не рекомендуется.
В отличие от других языков программирования VB не требует явного объявления типа переменной. Если переменная появляется в инструкции в программном коде впервые, то тип будет объявлен автоматически. Это так называемое неявное объявление типа переменной.
Исходя из этого, следующие инструкции эквивалентны:
Dim a As Currency
a = 276
или
a@ = 276