未处理IOException,设备未就绪。解决办法

未处理IOException,设备未就绪。
Dim MyGetDrives() As System.IO.DriveInfo = System.IO.DriveInfo.GetDrives()
 For i As Int16 = 1 To MyGetDrives.Count
  MsgBox(MyGetDrives(i - 1).VolumeLabel.ToString)
 Next

错误:未处理IOException,设备未就绪。

------解决方案--------------------
访问光驱、虚拟光驱、网络映射等盘符时会有这个提示,你判断一下或try catch一下就好了