CurrentDb.Execute "Insert Into tbl_pedido (Codigo_Livro,Titulo_Livro,NomeAluno,LivroEmprestado,ObzDoPedido) Values ('" & Me.TxtCodigo_Livro & "','" & Me.TxtTitulo_Livro & "','" & Me.CboCombinação1 & "','" & Me.TxtObzDoPedido & "'" & _
"(CadastradoPor) Values ('" & Me.TxtCadastradoPor & "')"
sou grato pela ajuda
"(CadastradoPor) Values ('" & Me.TxtCadastradoPor & "')"
sou grato pela ajuda