Ho letto il codice, vado a memoria, CB_verniciature.Items() restituisce il valore by index
Quindi devi usare un valore numerico che rappresenta l'indice del valore nell'oggetto
Prova con:
codice:If CB_verniciatura.SelectedItem.ToString="Semplice" Then