Untitled

Select Case ‘PO-nummer verplicht?’
	Case ‘Niet verplicht’
		Do Nothing()
	Case 'Bij verzending’
		When 'boeken > verzenden’
			If 'uw referentie' == ''
				Messagebox.Show("Veld 'uw referentie’ moet een waarde hebben")
	Case ‘Bij facturatie’
		When 'boeken > factureren'
			If 'uw referentie' == ''
				Messagebox.Show("Veld 'uw referentie’ moet een waarde hebben")
End Case