Dizzl,
met dit onderdeel stop ik even. Kom hier later op terug.
Gr. Math.
Heb nog een andere vraag.
Heb formulier gemaakt en als het gevuld is met de gegevens gaan deze gegevens naar een E-mail. Voordat de gegevens naar de e-mail gaan wil ik controleren of alle velden goed zijn ingevuld.
Bij de invul velden zit een combo box met de waarde 1. maak keuze 2. Koffie Pot 3. Thee Pot
Bij de controle zeg ik als combo "maak keuze" is, dan moet hij terug naar de combo box.
en geef een focus opdracht op terug te gaan naar combo box.
Deze controle doet hij goed, maar laat geen correctie doen. Het programma loopt meteen door naar de e-mail.Hoe laat ik het programma bij combo stoppen om een correctie te kunnen uitvoeren.
Gr. Math
HIERONDER WAT IK GESCHREVEN HEB
Private Sub Command2_Click()
If aantal = "" Then
aantal = InputBox("U bent vergeten het aantal vergeten ", "AANTAL NIET INGEVULD")
aantal.SetFocus
Else
End If
If Verkoopprijs = "" Then
Verkoopprijs = InputBox("U bent de prijs vergeten", "PRIJS NIET INGEVULD")
Else
End If
If Combo3 = "bezorgadres" Then
MsgBox "bezorgadres niet juist ? "
Combo3.SetFocus
Else
End If