Error al Editar VB.Net
VB.Net conectado access
Me da problema al momento de editar la clave
Codigo: ' creando y cargando coneccion y command
Dim coneccion As OleDbConnection
Dim orden As OleDbCommand
'abriendo la coneccion o enlace
coneccion = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & AppDomain.CurrentDomain.BaseDirectory & "\mibase.mdb")
' creando y cargando un objeto OLEDBCOMMAND con
' instruccion sql update
Dim q As String = "update mitabla set nombre = @nombre, edad = @edad where clave =" & txtclave.Text
orden = New OleDbCommand(q, coneccion)
orden.Parameters.Add(New OleDbParameter("@nombre", OleDbType.VarWChar, 20))
orden.Parameters("@nombre").Value = txtnombre.Text
orden.Parameters.Add(New OleDbParameter("@edad", OleDbType.Integer))
orden.Parameters("@edad").Value = txtedad.Text
' mandando sql a base de datos
orden.Connection.Open()
orden.ExecuteNonQuery()
orden.Connection.Close()
' avisando
Label4.Text = "REGISTRO EDITADO "
Este es el error 
Codigo Fuente
http://rapidshare.com/files/138917108/Editar.rar
Saludos