problema al grabar en base de dato access

[Fendul]

Buenas gente, les dejo el codigo de mi programa, la idea es guardar 5 datos personales de un cliente en una base de datos access 2007 con visual 2010.
El problema es que no puedo grabar se cae el programa y me sale el siguiente error: "invalid castexception was unhandled"
Estube buscado por todo internet una respuesta antes de realizar una pregunta pero encontre muchas opiniones y ninguna me sirvio.
Les dejo el pedazo del codigo del boton donde se realiza la escritura en la base.




Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'create the database connection
Dim aConnection As OleDbConnection
aConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; DataSource=D:\\Kiosco.mdb")


'Guardo en variables los valores que muestran los label

Dim campo1, campo2, campo4 As String
'Dim campo3, campo5 As Integer
campo1 = Label2.Text
campo2 = Label4.Text
campo3 = Label6.Text
campo4 = Label7.Text
campo5 = Label10.Text
'create the command object and store the sql query
Dim aCommand As OleDbCommand
aCommand = New OleDbCommand("insert into Cliente(nombre, apellido, telefono, direccion, dni) values ('" + campo1 + "','" + campo2 + "'," + campo3 + ",'" + campo4 + "'," + campo5 + ")", aConnection)
Try
aConnection.Open()
'create the datareader object to connect to table
Dim aReader As OleDbDataReader
aReader = aCommand.ExecuteReader()
MessageBox.Show("Cliente guardado con exito")
'close the reader
aReader.Close()
'Some usual exception handling
Catch ex As OleDbException
MessageBox.Show(ex.Message)
Console.ReadLine()
Finally
'close the connection Its important.
aConnection.Close()
End Try
End Sub
End Class