Доклад: Что такое API ?

For myDrive = 65 To 90

Debug.Print Chr(myDrive) & ":" & " - " & GetDriveType(Chr(myDrive) & ":")

Next

Вот что возвратит функция GetDriveType нам, например у меня:

A: - 2

C: - 3

D: - 3

E: - 5

Все остальные буквы помечены цифрой 1. Да, что бы понять эти обозначения нужно знать следующую таблицу:

Имя константы: Значение:

DRIVE_UNKNOWN	0
DRIVE_NO_ROOT_DIR	1
DRIVE_REMOVEABLE	2
DRIVE_FIXED	3
DRIVE_REMOTE	4
DRIVE_CDROM	5
DRIVE_RAMDISK	6

Подпрограмма Main в модуле является как Form_Load на форме, т.е. считается главной и загружается по умолчанию.

О предназначениях многих API функций можно легко догадаться по их названию. Например, GetWindowsDirectory (получить директорию Windows) или GetDriveType (получить тип носителя).