Меню
Главная
Авторизация/Регистрация
 
Главная arrow Менеджмент arrow ИНФОРМАЦИОННЫЕ ТЕХНОЛОГИИ В МЕНЕДЖМЕНТЕ
Посмотреть оригинал

Рамка (Frame)

Рамка — это элемент-контейнер, предназначенный для объединения в группу нескольких элементов управления, например переключателей. Объекты, объединенные с помощью рамки, можно перемещать, активизировать, деактивизировать, делать невидимыми как единое целое.

Для объединения элементов в группу нужно сначала создать элемент- контейнер, а затем добавить в него нужные элементы управления. Если требуемые элементы управления уже находятся в форме, их достаточно переместить в элемент-контейнер.

Рамка не имеет особых свойств, присущих только ей. При изменении значения свойств рамки будут изменяться также и значения соответствующих свойств всех входящих в рамку объектов. Например, если для рамки свойство Visible равно False, то все входящие в рамку элементы тоже станут невидимыми.

События рамки обычно не анализируются.

Список (ListBox)

Список (ListBox) позволяет пользователю выбирать из списка один или несколько элементов. В любое время в список можно добавлять новые элементы или удалять существующие. Если не все элементы могут одновременно отобразиться в поле списка, то в нем автоматически отображаются полосы прокрутки.

Событие списка: Click — щелчок мыши. Вызывается, если пользователь с помощью мыши или клавиш управления курсором выбирает элемент в списке.

Методы списка. Методы необходимы для обработки элементов списка — добавления или удаления.

Addltem — добавление нового элемента:

ListBox.Addltem Элемент [, Индекс]

где параметр Элемент задает добавляемый элемент списка; с помощью параметра Индекс указывается место вставки в список нового элемента.

Данный метод должен вызываться при вставке каждого элемента. Как правило, заполнение списка выполняется при загрузке формы.

Пример

Создание списка разрядов: Private Sub Form_Load () IstRasr.Addltem "10" IstRasr.Addltem "11" IstRasr.Addltem "12" IstRasr.Addltem "13" IstRasr.Addltem "14" IstRasr.Addltem "15" IstRasr.Addltem "16" IstRasr.Addltem "17"

End Sub

Removeltem — удаление элемента из списка:

ListBox.Removeltem Индекс_элемента

где Индекс элемента — индекс удаляемого элемента. Индексация начинается с 0.

Clear — удаление всех элементов списка:

ListBox.Clear

Свойства списка. Text — текст выбранного элемента списка.

List () — определение текста элементов списка в окне свойств (переход на новую строку в списке выполняется командой Ctrl + Enter).

Sorted — определяет способ расположения элементов в списке, например по алфавиту.

Listlndex — определение индекса выбранного элемента. Если в списке не выбран ни один элемент, то значение свойства = -1.

Пример

Обращение по индексу к элементу списка с помощью свойства List (): Is = IstBox.List (IstBox.Listlndex)

ListCount — текущее количество элементов в списке.

Пример

Обработка содержимого всех элементов списка в цикле: For i =0 to IstBox.ListCount-1 ' обработка IstBox.List (i)

Next i

Style — определяет внешний вид списка: стандартный список (0) или список флажков (/).

Columns - определяет количество колонок в тексте:

  • 0 обычный список;
  • 1 одна колонка с горизонтальной линейкой;
  • 2 две колонки.

MultiSelect — одновременный выбор нескольких элементов списка:

  • 0 множественный выбор невозможен;
  • 1 простой множественный выбор. Элементы списка выбираются щелчком мыши или нажатием Space;
  • 2 расширенный множественный выбор. Пользователь может выбрать несколько элементов с помощью мыши или клавиш управления курсором с использованием клавиш Shift и Ctrl.

Selected () — показывает, выделен данный элемент списка или нет. Содержит массив значений, соответствующих количеству элементов в списке. Если значение элемента в массиве равно True, то данный элемент выбран.

Пример

For i = 0 to IstBox. ListCount-1 If IstBox.Selection (i) then ' обработка IstBox.List (i) EndEf Next i

Itemdata — позволяет задать список значений числового типа, элементы которого соответствуют элементам списка ListBox.

Пример

Задача — создать список IstFam. Элементами списка являются фамилии студентов существующего файла данных. Свойству ItemData присвоить список значений — номера зачетной книжки студентов.

Private Sub Form_Load ()

Open "Stud" For Random As#l Len=Len (Stud)

For i=l to LOF (1) Len (Stud)

Get #1, i, Stud LstFam.Addltem Stud.Fam

LstFam.ItemData (IstFam.Newlndex) =Stud.NomSt

Next

End Sub

' Свойство Newlndex содержит индекс последнего добавленного в список элемента

Private Sub lstFam_Click ()

1 Действие над значением — номер зачетной книжки, полученным после выбора фамилии студента из списка n =IstFam.ItemData (IstFam.Listlndex)

End Sub

 
Посмотреть оригинал
Если Вы заметили ошибку в тексте выделите слово и нажмите Shift + Enter
< Предыдущая   СОДЕРЖАНИЕ   Следующая >
 
Популярные страницы