Prova così:
codice:
ObjCommand.Parameters.Add("@DN defunto", OleDbType.Date).Value = cdate(Me.TextBox9.Text)
ObjCommand.Parameters.Add("@DM defunto", OleDbType.Date).Value = cdate(Me.TextBox10.Text)
Facci sapere...
Ciao