ILTDVDBurner.Eraseable Example for Visual Basic

Private Sub Eraseable()
   Dim bEraseable  As Boolean
   bEraseable = burner.Eraseable
End Sub