3.6. Ввод и вывод данных

CurDir[(x)] ‑возвращает текущий путь на указанном (текущем) диске.

Dir(p[,a])‑ имя файла, каталога или диска, соответствующее указан­ной мас­ке (p) из символов “*”, “?” или атрибутам файла (a):vbNormal(обыч­ный),vbHidden(скры­тый),vbSystem(системный),vbVolum(метка тома),vbDirectory(каталог). Для поиска следующего файла параметры не ука­зыва­ют­ся. При отсутствии файла возвращается пустая строка.

Eof(N)‑ возвращает истину при достижении конца файла (N).

FileAtrr ‑ режим, в котором находится открытый файл.

FileDateTime(p) ‑ строка с датой и временем последней правки файлаp.

Freefile‑ следующий номер, доступный для открытия файла.

GetAttr(s)‑ возвращаются атрибуты файла, каталога или диска (S):cумма кон­­стантvbNormal,vbReadOnly,vbHidden,vbSystem,vbDirectory,vbArchive.

Inkey$‑ символ последней нажатой клавиши.

Input$(n,[,#<номер файла>]) - строка изNсимволов, считанных из файла.

InputBox(x[,t [,d [,x,y][,h, i]]]) - возвращает введенное значение в диа­ло­го­вом ок­не:X- сообщение,T‑ заголовок окна,D- значение по умол­чанию,X,Y‑ коор­ди­наты левого верхнего угла окна,h‑ имя справочногоHLP‑файла,I‑ номер раздела справочного файла.

LoadPicture(s) - загружает рисунок из файла под именемS.

LoadResData/LoadResPicture/LoadResString ‑ загружает данные/изображе­ние/стро­ку из файла ресурсов.

Loc(n) ‑ номер последней обработанной записи файла с прямым досту­пом под номером N.

Lof(n)‑ длина в байтах файла под номером N.

Lpos(1)- номер позиции в строке, с которой печатается следующий символ.

Mkdir(s) ‑создает директорию с указанным путемS.

Msgbox (s1 [,t [,h]][s2, n]) - номер нажатой кнопки.S1 иHзадают тексты сооб­ще­ния и заголовка диалогового окна. Если в сооб­ще­ние до­бавить сим­вол с кодом 13 (vbCr), то произойдет переход на следующую строку;

T- комбинация констант (режимов ра­бо­ты) через операциюOR:

вывод кнопок: OK (vbOKOnly), OK+Cancel (vbOKCancel), Abort+Retry+Ig­nore (vbAbortRetryIgnore), Yes+No+Cancel (vbYesNoCancel), Yes+No (vb­Yes­No), Retry+Cancel (vbRetryCancel), Help (vbMsgBoxHelp­Button);

вывод пиктограммы с одним из символов: X (vbCritical), ?(vbQuestion), ! (vbExclamation), i (vbInformation);

код кнопки в окне по умолчанию:кнопка 1-4 (vbDefaultButton1‑ 4);

модальность: модальность приложения (vbApplicationModal), системная (vbSystemModal);

дополнителные:vbMsgBoxRight(выравнивание текста по правому краю) иvbMsgBoxSetForeground(отображение окна в фоновом режиме).

Функция возвращает код нажатой пользователем кнопки: OK (vbOK), Cancel (vbCancel), Abort (vbAbort), Retry (vbRetry), Ignore (vbIgnore), Yes(vbYes), No (vbNo).

Параметры S2 иNзадают имя справочного файла и номер раздела этого файла, вызываемого клавишейF1.

Пример

If MsgBox(“Текущее время?”, vbYesNo OrvbQuestion, “Время”) = vbYes Then _

MsgBox (“Текущее время?” & Time)

Pos(1)/Csrlin ‑номер колонки/строки с курсором.

Seek(n) - номер следующей записи файла (N) с прямым доступом.

Spc(n)‑ пропуск N позиций при выводе строки на экран или на печать.

Tab(n)‑ переход наN-ю позицию строки при печати.

3.7. Установка цвета

Qbcolor(n) - возвращает RGB-код цвета под номером n (п.2.7.2).

Rgb(r,g,b) - код цвета (RGB‑код), скомбинированного из сос­тав­­ляющих ар­­гу­ментов насыщенности (от 0 до 255) красного, зеленого и синего цветов.

3.8. Обработка ошибок

Erdev$‑ имя устройства, вызвавшего ошибку (QB).

Err/Erdev (QB) ‑ код ошибки при работе программы/устройства.

Error[(n)]‑ текст сообщения об ошибке (последней) с номеромN.

3.9. Системные функции

Command$‑ строка параметров командной строки. Параметры могут быть заданы в среде разработки командойProject/Properties/Make/Commandlineargumentsили в командной строке запускаVisualBasicпосле текста /cmd.

Doevents, Environ‑ число загруженных форм, строка средыDOS.

GetAllSettings‑ возвращает список записей реестра Windows.

GetSettings‑ возвращает значение записи реестра Windows.

Shell(s[,w]) - выполняет программу (S) в окне типа W: обычное (vbNormal­Focus), мини­ми­зи­­ро­ван­ное (vbMinimizedFocus), развернутое (vbMaxi­mi­zed­Focus), обычное без фокуса (vbNormalNoFocus), миними­зи­ро­ванное без фокуса (vbMinimizedNoFocus), скрытое активное (vbHide).

3.10. Объекты (VB)

CallByName(object, procedurename, calltype [,arguments()])‑ устанавливает или получает значение свойства или выполняет метод (procedurename) объ­екта (object). КонстантаCalltypeтипаvbCallTypeзадает тип выполняемого метода:vbLet,vbGet,vbSet,vbMethod.

Примеры для текстового поляTextпод именемT.

CallByName T,“Mousepointer”,vblet,vbCrosshair‘T.Mousepointer=vbCrosshair

Result = CallByName(T, “MousePointer”, VbGet) ‘Result=T.MousePointer

CallByName T, “Move”, VbMethod, 100, 100 ‘T.Move 100, 100

CreateObject(class [,servername])‑ создает объектActiveXуказанного клас­са (class) на сервере‑приложенияOLEи возвращает ссылку.

GetAutoServerSettings‑ информация о текущем состоянии регистрации ком­понентаActiveX.

GetObject([f][,class])‑ возвращает ссылку наOLE‑объект из фай­ла (f) и ука­зан­ного класса (для зарегистрированного расширения класс можно опус­тить (Dim ob As Object: Set ob = GetObject(“D:\docum\pismo.doc”)).

IsObject(x)‑ возвращаетtrue, если аргумент типовObjectилиVariantVarTypevbObject.

Load/Unload object ‑ загрузка/удаление объекта в/из оперативной памяти.