Открыть лоток CD-ROM-a - VB
Формулировка задачи:
Ну все теперь я гроза CD-ROM`ов
Решение задачи: «Открыть лоток CD-ROM-a»
textual
Листинг программы
Private Declare Function mciSendString Lib "winmm.dll" _ Alias "mciSendStringA" (ByVal lpstrCommand As String, _ ByVal lpstrReturnString As String, ByVal uReturnLength As Long, _ ByVal hwndCallback As Long) As Long