Private Sub dvd_Click()
If dvd = True Then
ComboBox3.Visible = True
ComboBox6.Visible = False
ComboBox7.Visible = False
End If
End Sub
Private Sub cd_Click()
If cd = True Then
ComboBox3.Visible = False
ComboBox6.Visible = True
ComboBox7.Visible = False
End If
End Sub
Private Sub dvdgrave_Click()
If dvdgrave = True Then
ComboBox3.Visible = False
ComboBox6.Visible = False
ComboBox7.Visible = True
End If
End Sub