VB.NET에서 CD 드라이브 문자 가져 오기

Question

다음 코드를 사용하여 컴퓨터의 각 드라이브 문자 목록을 가져옵니다. 이 목록에서 CD 드라이브의 드라이브 문자를 가져오고 싶습니다. 어떻게 확인합니까?

나는 목록을 가져 오는 데 사용하고 코드는 다음과 같습니다 다음 Form.Load 이벤트에서

:

cmbDrives.DropDownStyle = ComboBoxStyle.DropDownList 
    Dim sDrive As String, sDrives() As String 

    sDrives = ListAllDrives() 

    For Each sDrive In sDrives 

    Next 
    cmbDrives.Items.AddRange(ListAllDrives()) 

. . . 이 LINQ를 사용하고 있기 때문에

Dim cdDrives = From d In IO.DriveInfo.GetDrives() _ 
       Where d.DriveType = IO.DriveType.CDRom _ 
       Select d 

For Each drive In cdDrives 
    Console.WriteLine(drive.Name) 
Next 

은 물론, 3.5 가정 :

Public Function ListAllDrives() As String() 
    Dim arDrives() As String 
    arDrives = IO.Directory.GetLogicalDrives() 
    Return arDrives 
End Function 

Answer 1

테스트

하고, 내 컴퓨터의 올바른 결과를 반환합니다. 목록 상자를 채우려면 Console.WriteLine을 ListBox.Items.Add로 변경하십시오.

Answer 2

For Each drive In DriveInfo.GetDrives() 

    If drive.DriveType = DriveType.CDRom Then 
     MessageBox.Show(drive.ToString()) 
    Else 
     MessageBox.Show("Not the cd or dvd rom" & " " & drive.ToString()) 
    End If 

Next