guardar en base de datos con acces y vb.net

[Aquaventus]

en esta parte :

Código vb:

da.SelectCommand.Parameters.AddWithValue("@enero",DataGridView1.CurrentRow.Cells("enero").Value)
da.SelectCommand.Parameters.AddWithValue("@eneroreal",DataGridView1.CurrentRow.Cells("eneroreal").Value)
 

agregale el ToString() al momento de jalar el dato :

Código vb:

da.SelectCommand.Parameters.AddWithValue("@enero",DataGridView1.CurrentRow.Cells("enero").Value.ToString())
da.SelectCommand.Parameters.AddWithValue("@eneroreal",DataGridView1.CurrentRow.Cells("eneroreal").Value.ToString())
 

y nos comentas. Saludos!.