Что такое API ?

| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: биология 6 класс, конспекты 9 класс
| Добавил(а) на сайт: Просдока.

Declare Function GetDriveType Lib "kernel32" Alias _

"GetDriveTypeA" (ByVal nDrive As String) As Long

Под параметром nDrive подрзумевается, буква латинского  алфавита плюс двоетечие, т.е. потенциальное имя дисковода, например C:

2. В подпрограмму  вписываем:

здесь цикл For...Next "подсовывает" функции GetDriveType все буквы  латинского алфавита по очереди. Функция Chr преобразовывает значения  таблицы ASCII (от 0 до 255) в буквы. Так вот 65 это буква A, a 90 это Z

Dim myDrive As Integer

For myDrive = 65 To 90

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

Next

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

A: - 2

C: - 3

D: - 3

E: - 5

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

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