計(jì)算機(jī)二級(jí)VisualBasic輔導(dǎo)：用VB打開任意盤(硬盤/U盤/光盤)的文件

在程序打包移植的時(shí)候，需要用到 光盤/U盤 。在不知道機(jī)子上的光盤的盤符是多少，或不知道盤符的類別和盤符的總數(shù)的話。
    ......... 可以用如下方法來(lái)判斷 .........
    要用到的 API 描述:
    返回機(jī)子上的所有盤符
    GetLogicalDriveStrings
    VB聲明
    Declare Function GetLogicalDriveStrings Lib "kernel32" Alias "GetLogicalDriveStringsA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
    說(shuō)明
    獲取一個(gè)字串，其中包含了當(dāng)前所有邏輯驅(qū)動(dòng)器的根驅(qū)動(dòng)器路徑
    返回值
    Long，裝載到lpBuffer的字符數(shù)量（排除空中止字符）。如緩沖區(qū)的長(zhǎng)度不夠，不能容下路徑，則返回值就變成要求的緩沖區(qū)大小。零表示失敗。會(huì)設(shè)置GetLastError
    參數(shù)表
    參數(shù) 類型及說(shuō)明
    nBufferLength Long，lpBuffer字串的長(zhǎng)度
    lpBuffer String，用于裝載邏輯驅(qū)動(dòng)器名稱的字串。每個(gè)名字都用一個(gè)NULL字符分隔，在最后一個(gè)名字后面用兩個(gè)NULL表示中止（空中止）
    不同的盤類型可以用 GetDriveType 來(lái)判斷.
    GetDriveType
    VB聲明
    Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long
    說(shuō)明
    判斷一個(gè)磁盤驅(qū)動(dòng)器的類型
    返回值
    Long，如驅(qū)動(dòng)器不能識(shí)別，則返回零。如指定的目錄不存在，則返回1。如執(zhí)行成功，則用下述任何一個(gè)常數(shù)指定驅(qū)動(dòng)器類型：DRIVE_REMOVABLE， DRIVE_FIXED， DRIVE_REMOTE， DRIVE_CDROM 或 DRIVE_RAMDISK