Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Probleem met keuzeveld postcode & Gemeente  (gelezen 2768 keer)

0 leden en 1 gast bekijken dit topic.

Offline vop

  • Lid
  • *
  • Berichten: 77
  • Geslacht: Man
  • Oplossing.be
Probleem met keuzeveld postcode & Gemeente
« Gepost op: 28 november 2015, 18:49:25 »
Bij het invullen van een nieuw lid gaat het goed tot aan de postcode.
Typ de code of klik ze aan en je krijgt foto 1 te zien.
Klik op "Beëindigen" dan klikken op pijltje naar onder bij "Gemeente".
Gemeente aangeduid en de cursor gaat terug naar "Postcode".

Is er iets dat ontbreekt in VB om verder te kunnen werken en deze fout niet te hebben.
Bijgevoegd een verkorte versie.

Offline dizzl

  • Ambassadeur
  • *****
  • Berichten: 2.345
  • I've Upped my standards,now,up yours!
Re: Probleem met keuzeveld postcode & Gemeente
« Reactie #1 Gepost op: 29 november 2015, 08:31:09 »
Wijzig
Me.Gemeente = Nullin
Me.Gemeente = "" 
Dubbele aanhaligstekens zonder spatie ertussen
Null is 'niets' je kan iets leegmaken maar niet 'niets' ergens instoppen. Klinkt dit logisch?
Systeem  : Intel Core i5-4440 3.1Ghz, 3.1GHz 16Giga Ram 64Bits
Software : Windows 10 professional, Avira, Office 2016 Professional

Offline vop

  • Lid
  • *
  • Berichten: 77
  • Geslacht: Man
  • Oplossing.be
Re: Probleem met keuzeveld postcode & Gemeente
« Reactie #2 Gepost op: 29 november 2015, 09:56:39 »
Bedankt dizzl.
Nu is die codefout weg.
Het enige wat er nog is, is dat de cursor terugkeert naar postcode, moet ik "Enter" en nog eens enter klikken en gaat dan pas verder om het form in te vullen.
Is er hier een oplossing voor of is dit normaal.

Offline dizzl

  • Ambassadeur
  • *****
  • Berichten: 2.345
  • I've Upped my standards,now,up yours!
Re: Probleem met keuzeveld postcode & Gemeente
« Reactie #3 Gepost op: 29 november 2015, 10:12:31 »
Private Sub Gemeente_AfterUpdate()
If IsNull(Me.Gemeente) Then
    Me.Postcode.RowSource = "SELECT DISTINCT Postcode FROM tblPostcodes"
Else
    Me.Postcode.RowSource = "SELECT postcode FROM tblPostcodes WHERE Gemeente='" & Me.Gemeente & "'"
End If

Me.Postcode.SetFocus

If Me.Postcode.ListCount = 1 Then
    Me.Postcode = DLookup("Postcode", "tblPostcodes", "Gemeente='" & Me.Gemeente & "'")
Else
    Me.Postcode = Null
    Me.Postcode.Dropdown
End If
Geboortedatum.SetFocus

End Sub
Geboortedatum.SetFocus
Systeem  : Intel Core i5-4440 3.1Ghz, 3.1GHz 16Giga Ram 64Bits
Software : Windows 10 professional, Avira, Office 2016 Professional

Offline vop

  • Lid
  • *
  • Berichten: 77
  • Geslacht: Man
  • Oplossing.be
Re: Probleem met keuzeveld postcode & Gemeente
« Reactie #4 Gepost op: 29 november 2015, 10:30:15 »
 :D
Nogmaals bedankt dizzl.
Dat is het, loop juist.
Kan nu deze topic afsluiten.

 


www.combell.com