SQL Query string in VBA Access 2010

Question

Hi everyone,
I am writing sql queries in VBA Access 2010.
Now, i am very new to VBA programming, so i don't know how i have to write te string for the query.
I mean, are the " a,d _& sings in the good place?
The query sits behind a button on the form and when i use the form and click on the button i get the following error
This is the code i wrote:
Option Compare Database
Option Explicit
Private Sub Knop9_Click()
Dim bedrijf As String
Dim startdatum As Date
Dim einddatum As Date
Dim aantal_uren_jaarlijks As Double
Dim gevolgde_uren As Double
Dim resterende_uren As Double
Dim naam As String
'Voeg de waarden die ingevuld werden in het form in de variabelen
Tekst1.SetFocus
bedrijf = Tekst1.Text
Tekst3.SetFocus
startdatum = Tekst3.Text
Tekst5.SetFocus
einddatum = Tekst5.Text
Tekst7.SetFocus
gevolgde_uren = Tekst7.Text
Tekst11.SetFocus
naam = Tekst11.Text
CurrentDb.Execute "UPDATE Lan_landmeter " _
& "SET OpleidingsBedrijf =" & bedrijf & " ,Opleiding_startdatum =#" & startdatum & "#,Opleiding_einddatum =#" & einddatum & "#,Aantal_opleidingsuren_vast=20,Aantal_gevolgde_uren =" & gevolgde_uren & ",Aantal_resterende_uren=0" _
& "WHERE Id_landmeter =" & naam & ""
CurrentDb.Close
End Sub
Did i wrote the query string right?
Thx

Answer 1

In Access create a View showing the information you want, then in design mode click View, SQL to see teh SQL you need. now make sure the SQL you build in VBA is exactly the same. so in the Immediate window type a ? then copy paste your code then press Enter
to see the result, EG:
?"UPDATE Lan_landmeter " _
        & "SET OpleidingsBedrijf =" & bedrijf & " ,Opleiding_startdatum =#" & startdatum & "#,Opleiding_einddatum =#" & einddatum & "#,Aantal_opleidingsuren_vast=20,Aantal_gevolgde_uren
=" & gevolgde_uren & ",Aantal_resterende_uren=0" _
        & "WHERE  Id_landmeter =" & naam & ""
Rod Gill
Author of the one and only Project VBA Book
www.project-systems.co.nz