Vraag : syntaxis fout binnen VAN clausule

Privé SubCalendar1_Click ()
Text1.Text = Calendar1.Value
End Sub

Private SubCalendar2_Click ()
Text2.Text = Calendar2.Value
End Sub

Privé SubCommand1_Click ()
Adodc1.RecordSource = „UITGEZOCHTE qryVAT.InvoiceNo, qryVAT.SumOfAmount, qryVAT.exVAT, [exVAT] *0.12 ALS BTW, qryVAT.DateDelivered van qryVAT WAAR [(((qryVAT.DateDelivered) tussen #“ & Text1.Text & „# en #“ & Text2.Text & „#)); „vastgestelde

DataGrid1.DataSource = Adodc1
Vastgestelde Vraag Command2_Click


rptVAT.DataSource = Adodc1
met rptVAT

. Secties („section1“). Controls. Punt ( " text1“). DataField = „InvoiceNo "
. Secties („section1“). Controls. Punt ( " text2“). DataField = „SumofAmount "
. Secties („section1“). Controls. Punt ( " text3“). DataField = „exVAT "
. Secties („section1“). Controls. Punt ( " text4“). DataField = de „BTW "



. Secties („section5“). Controls. Punt ( " function1“) .DataField = „SumofAmount "
. Secties („section5“). Controls. Punt ( " function2“) .DataField = „exVAT "
. Secties („section5“). Controls. Punt ( " function3“) .DataField = het Eind With

rptVAT.Show

End Sub




Private SubCommand2_Click ()
Adodc1.Refresh
End Sub

Private SubForm_Load ()


/>Adodc1.ConnectionString = „Provider=Microsoft.Jet.OLEDB.4.0; Data Source= D:\ROAInvent\databa se \ dbInvent.mdb; De/>istVeiligheid Info=False "
Adodc1.CursorLocation = adUseClient

Text1.Text = Date
Text2.Text = Date


text4.AddItem „ter Goedkeuring "
text4.AddItem „Uitgegeven "
adoDepartment.Recordset.MoveFirst
While niet adoDepartment.Recordset.EOF
Text3.AddItem adoDepartment.Recordset.Fields (0)
adoDepartment.Recordset.MoveNext
Wend

End Sub




here is de error



runtime '- 2147217900 (80040e14) fout
syntax binnen VAN clause

Antwoord : syntaxis fout binnen VAN clausule

Uw waar de clausule a heeft [daarin. Voor zover ik kan zien dit niet zou moeten zijn daar.

achting
Marco