Erreur de compilation qualificateur incorrect

Bonjour,
J'aimerai recuperer les contenus de mes champs du formulaire afin de les inserer dans une table mais un message apparait
Erreur de compilation qualificateur incorrect

Voila le code:

Private Sub AJOUTER_Click()
'Declaration des variables pour la requete d'insertion
Dim netab As Integer
Dim nb_classe As Integer
Dim nb_eleve As Integer
Dim jour_visite_1 As String
Dim jour_visite_2 As String
Dim jour_visite_3 As String
Dim heure_arrivee As Date
Dim venus_en_2007 As String
Dim retenu_2009 As String
Dim devis As Integer
Dim distanceAR As Integer
Dim observation As String

'Recuperation des valeurs des champs du formulaire pour l'insertion dans la table
netab = netab.Value
'nb_classe = nb_classe.Value
'nb_eleve = nb_eleve.Value
'nb_accompagnateur = nb_accompagnateur.Value
'jour_visite_1 = jour_visite_1.Value
'jour_visite_2 = jour_visite_2.Value
'jour_visite_3 = jour_visite_3.Value
'heure_arrivee = heure_arrivee.Value
'venus_en_2007 = venus_en_2007.Value
'retenu_2009 = retenu_2009.Value
'devis = devis.Value
'distanceAR = distanceAR.Value
'observation = observation.Value

'Requete d'insertion
DoCmd.RunSQL ("INSERT INTO choix_colleges VALUES(" & netab & "," & nb_classe & "," & nb_eleves & "," & nb_accompagnateur & ",'" & jour_visite_1 & "','" & jour_visite_2 & "','" & jour_visite_3 & "'," & heure_arrivee & ",'" & venus_en_2007 & "','" & retenu_2009 & "'," & devis & "," & distanceAR & ",'" & observation & "');")