problema al grabar en base de dato access

[Aquaventus]

Has intentando colocarlo de la siguiente manera? :

Código vb:

Dim campo1, campo2, campo4 As String
Dim campo3, campo5 As Integer
campo1 = Label2.Text
campo2 = Label4.Text
campo3 = Convert.ToInt32(Label6.Text)
campo4 = Label7.Text
campo5 = Convert.ToInt32(Label10.Text)
 

Saludos!.

PDT: Si aún así muestra error, Indícanos en qué linea cae.