kan geen waarde toekennen aan entryfield

[JEPEDEWE]

Hallo,

Ik maakte een form aan met volgende code bij het openen:

Private Sub Form_Open(Cancel As Integer)
    Me.zoekdatum = Date
    Me.DATUM_betalingen = "betalingen voor " & Me!zoekdatum
    Me.Command5.SetFocus
End Sub

laat ik de form lopen dan krijg ik een foutmelding die azegt dat ik aan "zoekdatum" geen waarde kan toekennen
Hoe kan dat?

Bedankt
JP

 

[OctaFish]

Op welke regel krijg je de foutmelding? En waarom doe je niet:

Me.DATUM_betalingen = "betalingen voor " & Date()

Of

Me.DATUM_betalingen = "betalingen voor " & Me.zoekdatum

Me!zoekdatum verwijst naar een veld, en Me.zoekdatum naar een formulierobject. In dit geval is het tekstveld wel gevuld, maar het tabelveld nog niet opgeslagen. Dus dat zou de fout kunnen veroorzaken. Gebruik Me! en Me. dus bewust, en niet omdat die toets toevallig in de buurt ligt

 

[JEPEDEWE]

Bedankt voor je zoveelste reactie

Ik veranderde de code zoals je schreef,
maar nog steeds weer is er de foutmelding bij:
Me.zoekdatum = Date

Ik krijg
Fout -2147352567 (800200009) tijdens uitvoering
U kunt geen waarde aan dit object toekennen

Nog ideeen?

Mvg
JP

 

[OctaFish]

En wat is 'Zoekdatum' voor een veld? Het riekt als (inderdaad...) een veldje dat je gebruikt om iets te zoeken, dus dan zou het een niet-gebonden tekstveld moeten zijn. Dus hoe is dat ingericht?