Операторы.

A-C

 

По порядку: AppActivate

Beep

Call

ChDir

ChDrive

Close

Const

 

 

AppActivate title[, wait] - Активизирует окно приложения с заголовком title. Вместо заголовка можен быть использовано ID задачи, полученное при помощи функции Shell.

Пример:

Dim MyAppID, ReturnValue
AppActivate "Microsoft Word" 'Активизируется Microsoft Word

MyAppID = Shell("C:\WORD\WINWORD.EXE", 1) ' Запускаем Microsoft Word.

AppActivate MyAppID 'Активизируется Microsoft Word

 

 

B

 

Beep - Проигрывает звук, установленный в системе как "Стандартный звук" (в панели управления->Звук). Если такой не установлен, то играется PC спикер.

Пример:

Beep

 


C

 

[Call] name [argumentlist] - Вызывает процедуру или функцию. Оператор Call может быть опущен.

Пример:

Call PrintToDebugWindow ("Hello World")
'Вызываем процедуру. Скобки обязательны!
PrintToDebugWindow "Hello World"
'То же самое. Скобки можно опустить.

Sub PrintToDebugWindow (AnyString)
Debug.Print AnyString ' Печатаем в окно Debug.
End Sub

 

ChDir path - Смена текущего каталога.

Пример:

' Изменяем текущую директорию на "MYDIR".
ChDir "MYDIR"

' Пусть диск "С:" является текущим диском. Следующий оператор
' изменяет текущий каталог на "D:\WINDOWS\SYSTEM", но
' текущим диском по-прежнему остаётся "С:".
ChDir "D:\WINDOWS\SYSTEM"

 

ChDrive drive - Смена текущего диска.

Пример:

ChDrive "D"

 

Close [number] - Закрывает файл, открытый оператором Open под номером number.

Пример:

Open "TESTFILE" For Output As #3
Print #3, "Hello World"
Close #3

 

[Public | Private] Const constname [As type] = expression - Объявляет константу.

Пример:

' Константа типа Private (используется по умолчанию).
Const MyVar = 459

' Константа типа Public.
Public Const MyString = "HELP"

' Константа Private, типа Integer.
Private Const MyInt As Integer = 5

 

 
 
Вернутся на главную   Вернутся на предыдущую.
Rambler's Top100   

 

Сайт управляется системой uCoz