国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

關(guān)于VB光驅(qū)的控制
Private Declare Function mciExecute Lib "winmm.dll" Alias "mciExecute" (ByVal lpstrCommand As String) As Long
以上是聲明一句API，VB不能直接調(diào)用API函數(shù)。所以先聲明一下，以下是詳解
private :私有的一個(gè)窗體模塊級(jí)變量。
declare ：外部的一個(gè)過程
function:有返回值的一個(gè)函數(shù)。無返回值的用sub
mciExecute :函數(shù)名字
Lib :在，庫。
"winmm.dll" 是動(dòng)態(tài)庫的名字
Alias 別名，因?yàn)橛械腁PI函數(shù)和VB內(nèi)置函數(shù)是一個(gè)樣子的。所以加個(gè)別名
(ByVal lpstrCommand As String) ：一個(gè)參數(shù)，在C中是一個(gè)字符指針，在VB中是一個(gè)子符串
As Long：說明返回值是長整形。
開光驅(qū)的命令是 mciExecute "set cdaudio door open"
關(guān)光驅(qū)的命令是 mciExecute "set cdaudio door closed"