Access - RE:Agregar un registro mediante evento de codigo

He estado haciendo pruebas, y por ahora me he quedado aqui;

Private Sub Comando2_Click()

Dim rst As Recordset

Set rst = CurrentDb.OpenRecordset(\"Asistencia\")

rst.AddNew
rst!Jornada = ID_Combo
rst!Asistentes = Fecha_Combo
rst.Update
rst.Close

End Sub

Me contesta que no coinciden los tipos

Gracias