Знаки типов

Использование в качестве аргументов процедур и функции имен форм и элементов управления

Инструкция 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

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