Реферат: Курс лекций по V B 5.0

Изменение текущего пути для списка файлов

PatternChange

Изменение шаблона для отображения файлов в списке

Пример события PathChange

Sub File1_PathChange ()

Label1.Caption = "Path: " & Dir1.Path ' Show path in label.

End Sub

Sub Dir1_Change ()

File1.Path = Dir1.Path ' Set file path.

End Sub

Sub Form_Load ()

Label1.Caption = "Path: " & Dir1.Path ' Show path in label.

End Sub

Sub Drive1_Change ()

Dir1.Path = Drive1.Drive ' Set Dir path.

End Sub

Sub Dir1_Change ()

File1.Path = Dir1.Path ' Set File path.

End Sub

DirectoryListBox- список каталогов.

Элемент управления DirListBox - отображает дерево каталогов текущего диска. Содержимое списка каталогов обновляется при двойном щелчке мыши. Подкаталоги текущего каталога нумеруются от 0 до ListCount - 1. Сам текущий каталог имеет индекс -1, родительский -2, выше -3 , ...При двойном щелчке мыши вызывается событие Change и меняется значение свойства Path .

Основные свойства Списка каталогов.

Свойство

Содержание

List

Массив членов списка каталогов

ListCount

Кол. членов списка каталогов

ListIndex

К-во Просмотров: 1383
Бесплатно скачать Реферат: Курс лекций по V B 5.0