назад | содержание | вперед

Элемент управления ProgressBar

Некоторые операции вашего приложения могут выполняться довольно долго, например, обработка большого массива данных или сложная выборка из базы данных, содержащей огромное количество записей. В этой ситуации пользователь начинает беспокоиться, не зависла ли программа. Работа продолжительных задач может сопровождаться отображением на экране индикатора процесса выполнения. Используем для этого стандартный элемент управления Microsoft ProgressBar (рис. 8.33).

Рис. 8.33. Использование в форме элемента управления ProgressBar

Настройка элемента управления ProgressBar достаточно проста. Для его размещения в форме используется кнопка ProgressBar на панели элементов управления. Основные свойства данного элемента управления перечислены в табл. 8.11.

Таблица 8.11. Свойства элемента управления ProgressBar

Свойства 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.

назад | содержание | вперед

Поделитесь этой записью или добавьте в закладки