用API函數(shù)控制光驅(qū)的開關(guān) 
   
　 
    使用API函數(shù)CDdoor 來控制光驅(qū)門的開和關(guān)程序十分簡單，由于 CDdoor 函數(shù)自身包含了對(duì)異常錯(cuò)誤的處理機(jī)制，因此這個(gè)程序的通用性很高，你可以把這段代碼移植到你的程序中，實(shí)現(xiàn)某些多媒體播放器所常用的開關(guān)光驅(qū)的功能。

　　

　　CDdoor函數(shù)是安裝WINDOWS時(shí)所自帶的winmm.dll文件中包含的函數(shù)，我們只須先加入如下的聲明后就能引用這個(gè)API函數(shù)：
　　Private Declare Function CDdoor Lib "winmm.dll" Alias "mciSendStringA" _
　　　( _
　　　ByVal lpstrCommand As String, _ 　　　　　　String，這是控制命令參數(shù)
　　　ByVal lpstrReturnString As String, _　　　　String，這是返回值
　　　ByVal uReturnLength As Long, _　　　　　　　Long，返回值長度參數(shù)
　　　ByVal hwndCallback As Long _
　　　) As Long

　　引用的語法是：Call CDdoor("set CDAudio door closed", 0, 0, 0)　　用以關(guān)閉光驅(qū)門

　　　　　　　　　Call CDdoor("set CDAudio door open", 0, 0, 0)　　　用以打開光驅(qū)門

　　程序中使用了一個(gè)布爾型變量來標(biāo)示當(dāng)前光驅(qū)門開與關(guān)的狀態(tài)。

　　如果配合檢測光驅(qū)是否存在的函數(shù)一起使用，此程序的通用性會(huì)更高。而關(guān)于檢測驅(qū)動(dòng)器信息的函數(shù)GetDriveType，GetLogicalDrives，我們會(huì)在另外一個(gè)實(shí)例中介紹。