MsgBox

[Djang]

Hoi ,

Ik ben een bestel formulier aan't maken , via een UserForm worden alle gegevens ingevuld .
nu heb ik msgboxen gemaakt als er bepaalde velden niet zijn ingevuld

If Trim(Me.invoer_naam.Value) = "" Then
Me.invoer_naam.SetFocus
MsgBox " Gelieve een Naam in te voeren "
Exit Sub
End If

If Trim(Me.invoer_straat.Value) = "" Then
Me.invoer_straat.SetFocus
MsgBox " Gelieve een Straat in te voeren "
Exit Sub
End If

If Trim(Me.invoer_huis_nr.Value) = "" Then
Me.invoer_huis_nr.SetFocus
MsgBox " Gelieve een huis Nr. in te voeren "
Exit Sub
End If


If Trim(Me.invoer_gemeente.Value) = "" Then
Me.invoer_gemeente.SetFocus
MsgBox " Gelieve een Gemeente in te voeren "
Exit Sub
End If

maar ik wil ook msgboxen maken voor velden die niet verplicht in te vullen zijn als herinnering maar niet als verplicht in te vullen .

 

[wampier]

En wat is je vraag?

Overigens ben ik persoonlijk meer een fan van alle missende vakken een rode kleur geven en een enkele melding. Dat voorkomt frustratie als er meerdere missende onderdelen zijn en is bovendien makkelijker te onderhouden.

Bij niet verplichte velden maak je die dan oranje of zo en geeft je een keuzebox met zoiets als "niet alle velden zijn ingevuld, weet u zeker dat u wil doorgaan? ja/nee.

 

[snb]

Ontwerp je userform zo, dat een gebruiker geen fout kan maken en niets kan vergeten. Msgboxen zijn verlegenheids'oplossingen'.