S до Z, получают тип
| DefInt A-Z | Все переменные получают тип integer. |
| DefInt I-J | Все переменные, начинающиеся с букв I и J, получают тип integer. |
| DefStr S-Z | Все переменные, начинающиеся с букв от S до Z, получают тип String |
В частности, можно установить соглашение, что все переменные, начинающиеся с I, будут целочисленными, с помощью Deflnt I. После этого оператор Dim I... будет объявлять переменные типа integer. Основные формы различных операторов DefType, необходимых в данной главе:
Deflnt диапазон букв (для integer)
DefLng диапазон букв (для long integer)
DefSng диапазон букв (для single precision)
DefDbl диапазон букв (для double precision)
DefCur диапазон букв (для currency)
DefStr диапазон букв (для string)
DefVar диапазон букв (для variant)
DefBooi диапазон букв (для boolean)
DefByte диапазон букв (для byte)
DefDate диапазон букв (для date)
Буквы не обязательно должны быть заглавными: DefStr s-Z и DefStr S-Z работают одинаково. Соглашения о типах можно всегда изменить, используя идентификатор или оператор Dim для конкретной переменной. Оператор DefType размещают в том же разделе (General), что и Option Explicit.
| vbPRPQDraft | 1 | Черновая печать |
| vbPRPQLow | 2 | Низкое разрешение |
| vbPRPQMedium | 3 | Среднее разрешение |
| vbPRPQHigh | 4 | Высокое разрешение |
Примечание:
Примечание:
Дополнительно можно устанавливать разрешение в точках на дюйм, если принтер (и его драйвер) поддерживают это.
| CommEvent | Ключевое слово элементов управления коммуникациями. Различные значения этого свойства соответствуют как событиям, так и ошибкам коммуникационного порта. Например, если значение этого свойства равно константе comEOF (=7), то это говорит о наличии символа конца файла (ASCII 26) в буфере приема. |
| CommPort | При записи устанавливает адрес коммуникационного порта, при чтении - возвращает адрес текущего порта. (1 - для порта Сош 1,2— для порта Corn 2 и т.д.) |
| Settings | Устанавливает или возвращает следующие параметры: скорость обмена, наличие бита четности, число бит данных, число стоп-битов. Может устанавливаться как при создании элемента, так и во время работы приложения. |
| PortOpen | Открывает и закрывает коммуникационный порт. |
| Input | Возвращает символы, находящиеся в буфере приема. |
| Output | Посылает строку символов в буфер отправки. |
Элемент управления коммуникациями реагирует только на событие OnComm. Это событие соответствует изменению значения свойства CommEvent. При возникновении события можно, проанализировав значение свойства CommEvent, вызвать соответствующий обработчик события.
Так же, как и остальные управляющие элементы, элемент управления коммуникациями дает возможность легкой настройки свойств через диалоговую панель. Для этого достаточно в окне Properties перейти к пользовательским настройкам (Custom). В появившейся диалоговой панели можно установить необходимые свойства элемента управления.
| # | Требуется цифра. |
| . | Десятичная точка. Внешний вид данного символа при выводе зависит от текущих настроек системы Windows. |
| , | Разделитель множества. Как и в предыдущем случае, внешний вид выводимого символа зависит от настроек операционной системы. |
| : | Разделитель для поля времени. |
| / | Разделитель для поля даты. |
| ? | Требуется буква. Например, а - z или А - Z. |
| & (или С) | Требуется символ ASCII, код которого находится в промежутке 32-126 или 128 -255. |
| > | Переводит все вводимые символы в верхний регистр. |
| < | Переводит все вводимые символы в нижний регистр. |
| А | Требуется буква или цифра. |
| а | Позволяет ввести букву или цифру. |
| 9 | Позволяет ввести цифру. |
К примеру, маска "а9" позволяет, но не требует от пользователя введения двух символов. Первым символом может быть любая буква или цифра, вторым -только цифра.
Все остальные символы, которые не указаны в таблице, непосредственно выводятся на экран. (Если надо просто вывести один из специальных символов, не учитывая его значение, просто поставьте перед ним символ обратной косой черты \. Например, маска "\##" выводит на экран символ #, после которого следует поле для ввода цифры).
Для создания ноля ввода времени и даты можно использовать одну из предопределенных масок.
| Пустая строка (" " в коде) | (Используется по умолчанию.) Означает отсутствие маски ввода. В этом случае панель редактирования с маской ввода ведет себя как обычная текстовая панель. |
| ## - ??? - ## | Маска для ввода даты (соответствует стандарту, принятому в США). |
| ## - ## - ## | То же самое. За исключением того, что название месяца заменяется его номером. |
| ##:## ?? | Маска для ввода времени (расширенный формат). |
| ##:## | Маска для ввода времени (сокращенный формат). |
Одним из наиболее редко используемых событий при работе с панелями редактирования с маской ввода является событие Validation Error. Оно имеет место при попытке пользователя ввести неверные данные. (Это событие может использоваться только для установления факта ввода символа, не соответствующего маске.)
| IvwIconO | 0 | (Используется по умолчанию.) Каждый объект List Item состоит из полноформатной иконки и метки. |
| IvwSmallIcon 0 | 1 | Каждый объект List Item представляется иконкой малого размера и меткой, расположенной справа от иконки. Все элементы выравниваются по горизонтали. |
| IvwList | 2 | Как и в предыдущем случае, каждый объект .состоит из иконки малого размера и текстовой Сметки, расположенной справа от иконки. Но при .этом все объекты представляются в виде списка. |
| IvwReport | 3 | Каждый объект элемента List Item представляется иконкой малого размера и меткой. Иконки и метки располагаются в колонках. Также для вывода пояснительного текста используются дополнительные колонки. |
Изображаемые элементы управляющего элемента List View называются List Item объектами. Каждый объект List Item имеет собственные свойства, описывающие его поведение. Наиболее важные из них представлены в таблице далее.
Также можно выбрать заголовок для выводимого столбца в управляющем элементе List View. Для этого необходимо установить значение True/False для свойства Hide Column Headers. Соответствующий заголовок хранится в объекте Column Header, а все заголовки колонок собраны в коллекцию Column Headers.
| Icons | Возвращает или позволяет установить индекс или ключ для иконки, ассоциированной с объектом List Item. |
| Selected | Сообщает о том, что объект List Item был выбран пользователем (или позволяет его выбрать самостоятельно). |
| Smalllcons | Возвращает или позволяет установить индекс или ключ для иконки малого размера, ассоциированный с объектом. |
| Subltems | Возвращает или позволяет установить поясняющую строку для подэлемента, ассоциированного со специальным объектом List Item. |
| Text | Задает текст, который будет виден пользователем. |
Совет:
Совет:
Для сохранения системных ресурсов можно привязать элемент Image List к управляющему элементу List View. Для этого надо установить ссылки свойств Icons и Smalllcons элемента List View на управляющий элемент Image List. Также можно указать соответствующий элемент Image List во время проектирования, воспользовавшись свойством (Custom) диалоговой панели.
| 0 | (Используется по умолчанию.) Размер и положение элемента могут быть произвольными. |
| 1 | Линейка расположена наверху формы и имеет ширину, равную ширине формы. |
| 2 | То же самое, но линейка расположена снизу от формы. |
| 3 | Линейка выровнена по левому краю формы, а ее высота равна высоте формы. |
| 4 | То же самое, но линейка выровнена по правому краю формы. |
Точно так же, как и в случае с полосой прокрутки, можно, изменяя свойства Min и Мах, установить границы изображаемой линейки прогресса. Свойство Value определяет текущую позицию прогресса.
Совет:
Совет:
Для того чтобы изобразить большее количество блоков внутри линейки, можно уменьшить высоту или увеличить ширину управляющего элемента.
Рассмотрим пример: пусть необходимо изобразить количество времени, прошедшего с начала какого-нибудь процесса. Для этого создадим элемент управления таймером, метку и линейку прогресса.
Теперь установим для свойства Min значение 0, а для свойства Мах - значение 60. Свойство Interval для элемента управления таймером следует установить в 1000 (что соответствует 1 секунде). Тогда следующий фрагмент кода будет изображать при помощи линейки прогресса прошедшее время (в секундах).
Private Sub Timerl_Timer ()
Static Progress As Integer
Progress = (Progress + 1) Mod 60
Labell.Caption = Str$(Progress) & " seconds elapsed."
ProgressBarl.Value = Progress
End Sub
| SbrText | (Используется по умолчанию.) Позволяет выводить произвольный текст или картинку. Выводимый текст определяется значением свойства text. Вывод картинки осуществляется при помощи метода Load Picture. |
| SbrCaps | Если клавиша CAPS LOOK была нажата, то слово CAPS выводится отчетливыми символами, в противном случае - слово выводится приглушенным серым цветом. |
| SbrNum | То же самое, но для клавиши NumLock. |
| SbrIns | То же самое, но для клавиши Insert. |
| SbrScrl | То же самое, но для клавиши ScrollLock. |
| SbrTime | Служит для вывода текущего времени в текущем используемом системой формате. |
| SbrDate | Служит для вывода текущей даты в текущем используемом системой формате. |
И наконец, необязательный параметр picture задает соответствующее растровое изображение. Например, следующий фрагмент кода:
Private Sub Form Load()
Dim MyPanel As Panel
StatusBar1.Panels(1).Text. = "Default panel exits already"
Set MyPanel = StatusBarl.Panels.Add(,,, sbrTime)
Set MyPanel = StatusBarl.Panels.Add(,,"Panel demo")
Set MyPanel = StatusBarl.Panels.Add(,,,, LoadPicture("C:\VB\ICONS\TRAFFIC\TRFFC01.ICO"))
End Sub
создает строку состояния.
Заметим, что приходиться использовать переменные объекта для создания панели с соответствующими свойствами. Однако можно заменить это двумя строками кода, первым шагом создав панель.
Например:
MyPanel = StatusBarl.Panels.Add
MyPanel == StatusBarl.Panels(2).Text = "Panel demo"
Еще одним свойством, связанным со строкой состояния, является свойство AutoSize. Оно может принимать следующие значения.
| SbrNoAutoSize | (Используется по умолчанию.) Запрещает автоматическую установку размера. |
| SbrSpring | При изменении размера родительской строки состояния автоматически высчитывается новый размер области. (Ширина области не может быть меньше, чем ширина, определяемая свойством MinWidth окна состояния). |
| SbrContents | При наличии свободного места размер панели соответствует ширине, необходимой для помещения надписи. |
Примечание:
Примечание:
В некоторых приложениях бывает необходимо размещать только один элемент в строке состояния. (Например, многие программы используют строку состояния для вывода пояснений при выборе какого-либо пункта меню, но при закрытии меню выводят в эту строку информацию общего назначения.) В этом случае необходимо установить для свойства Style значение Simple (константа SbrSimple используется во время выполнения приложения). После этого надо назначить необходимый для вывода текст свойству SimpleText.
| Tbr Default | (Используется по умолчанию.) Указывает на то, что кнопка является обычной нажимаемой кнопкой (push button). |
| Tbr Check | Кнопка является кнопкой проверки (check button). |
| Tbr Button Group | Кнопка принадлежит к группе. Это означает, что данная кнопка не может быть нажата до тех пор, пока нажата другая кнопка группы. В одно и то же время только одна кнопка из группы может находиться в нажатом состоянии. |
| Tbr Separator | Кнопка представляет собой обычный разделитель, имеющий стандартную ширину в 8 пикселов. |
| Tbr Placeholter | Кнопка представляет собой разделитель с переменной шириной |
И, наконец, параметр image задает ключ или индекс для ассоциации с изображением, предварительно сохраненным в элементе Image List.
Так же, как и в случае с объектом Panel, можно сначала добавить кнопки, а затем описать их свойства. Например, если надо на этапе проектирования добавить только одну кнопку с надписью "First button", следует воспользоваться следующим фрагментом кода:
Tooibarl.Buttons.Add
Toolbarl.Buttons(2).Caption = "Second button"
Tooibarl.Buttons.Add
Toolbarl.Buttons(3).Caption = "Third button"
Примечание:
Примечание:
Свойство AllowCustomize позволяет пользователю управлять такими настройками панели инструментов, как выравнивание колонок, скрытие и вывод панели и другими. Соответствующее меню вызывается при двойном щелчке мыши по панели инструментов. Можно запретить подобные действия путем установки значения свойства AllowCustomize в False. Для получения более подробной информации следует обратиться к справочной системе.
| Optimize for Fast Code | Максимально увеличивает скорость выполнения. |
| Optimize for small Size | Минимизирует размер. Вероятно, этим значительного преимущества перед простым использованием р-кода достигнуто не будет. |
| No Optimize | Компилирует без оптимизации. |
| Favor Pentium Pro | Оптимизирует код таким образом, что он лучше всего работает на процессоре Pentium Pro. Код, сгенерированный с этой опцией, будет работать и с более ранними процессорами, но на процессорах 486 и Pentium (даже если они используют MMX), будет работать медленнее, чем тот код, но сгенерированный без этой опции. |
| Create symbolic Debug Info | Используется, когда надо запустить свой VB-код на отдельном отладчике, такой как один из отладчиков фирмы NuMega или тех, что поставляются с компонентами Microsoft DevStudio. |
Примечание:
Примечание:
Программа, которая выполняет большое количество циклов, такая, как, например, стандартные тесты, покажет поразительное ускорение - часто даже десятикратное по сравнению с программами на Visual Basic 4. На практике, однако, ускорение, вероятно, будет значительно меньше (часто менее 50 процентов, иногда даже около 20 процентов).
| Creat a setup Programm | Сообщает о том, что требуется создать обычную программу установки на гибких дисках. Если также установить опции Generate Dependency File, то матер установки создаст отчет, содержащий информацию о файлах, которые использует приложение. |
| Creat Internet Download Setup | Эта опция используется только для элементов управления ActiveX и создает все необходимые файлы таким образом, что кто-либо по сети Internet сможет использовать этот код. |
| Generate Dependency File Only | Установка этой опции только создает отчет, содержащий информацию о файлах, которые использует приложение. |
