назад | содержание | вперед
Элемент управления ProgressBar
Некоторые операции вашего приложения могут выполняться довольно долго, например, обработка большого массива данных или сложная выборка из базы данных, содержащей огромное количество записей. В этой ситуации пользователь начинает беспокоиться, не зависла ли программа. Работа продолжительных задач может сопровождаться отображением на экране индикатора процесса выполнения. Используем для этого стандартный элемент управления Microsoft ProgressBar (рис. 8.33).
Рис. 8.33. Использование в форме элемента управления ProgressBar
Настройка элемента управления ProgressBar достаточно проста. Для его размещения в форме используется кнопка ProgressBar на панели элементов управления. Основные свойства данного элемента управления перечислены в табл. 8.11.
Таблица 8.11. Свойства элемента управления ProgressBar
|
Свойство |
Назначение |
|
Height |
Высота индикатора |
|
Width |
Ширина индикатора |
|
Min |
Минимальное значение свойства value. Задается в целых числах |
|
Мах |
Максимальное значение свойства Value. Задается в целых числах |
|
Value |
Значение свойства определяет, какая часть индикатора закрашена |
Свойства Height и width определяют внешний вид индикатора. Значения данных параметров устанавливаются такими, чтобы ширина была значительно больше высоты. В этом случае процесс индикации более нагляден.
Свойства Min и мах задают диапазон изменения значения свойства value. По умолчанию они равны 0 и 100. Если, например, в вашем приложении определенные действия выполняются в цикле, то значения свойств Min и мах следует устанавливать исходя из параметров цикла. При этом в цикле необходимо обновлять значение свойства Value. Ниже приведен фрагмент программы, показывающий обновление данного свойства:
Dim i As Integer
i = 1
Do While i <= 1000
' На месте этих комментариев должны быть выполняемые в цикле действия ProgressBar1.Value = i
i = i + 1
Loop
Замечание
Значения свойств Min и Мах можно задавать как программно, так и в диалоговом окне Property Pages, открываемом при выборе команды Properties контекстного меню объекта ProgressBar.
назад | содержание | вперед
