ILTDVDBurner.Ejectable Example for Visual Basic

Private Sub Ejectable()
   Dim bEjectable As Boolean
   bEjectable = burner.Ejectable
End Sub