Como acrescentar comando no botão salvar, pra salvar e fazer algo mais

Olá pessoal, sou novato aqui e espero saber explicar bem meu problema.
Seguinte, tenho uma tabela (TBL_SOLICITACAO_DIARIA) a qual acrescento dados através de uma formulário (FRM_CADASTRO_DIARIAS),
tem um botão novo, pra criar novo cadastro, clico nele, informo os dados e clico em salvar.
Agora o meu problema...
Na tabela TBL_SOLICITACAO_DIARIA eu tenho um campo RestosAlfa01 tipo texto.
O que eu quero é que quando eu clicar em salvar esse campo seja preenchido com a letra A.
Obs.: Esse campo RestosAlfa01 não aparece no formulário, é oculto.

Comando do botão salvar:

Private Sub Salvar_Click()
On Error GoTo Err_Salvar_Click


   DoCmd.RunCommand acCmdSaveRecord

Exit_Salvar_Click:
   Exit Sub

Err_Salvar_Click:
   MsgBox Err.Description
   Resume Exit_Salvar_Click
   
End Sub

Tem como colocar mais um comando pra colocar a letra A no campo RestosAlfa01 ??
 

Olá, boa noite..
Acrescente a linha que esta em vermelho
Private Sub Salvar_Click()
On Error GoTo Err_Salvar_Click


DoCmd.RunCommand acCmdSaveRecord
me.seucampodetextooculto.value = "A"

Exit_Salvar_Click:
Exit Sub

Err_Salvar_Click:
MsgBox Err.Description
Resume Exit_Salvar_Click

End Sub

bons estudos a si.

Fiz como vc falou

Private Sub Salvar_Click()
On Error GoTo Err_Salvar_Click


   DoCmd.RunCommand acCmdSaveRecord
  Me.RestosAlfa01.Value = "A"

Exit_Salvar_Click:
   Exit Sub

Err_Salvar_Click:
   MsgBox Err.Description
   Resume Exit_Salvar_Click
   
End Sub

Mas dá erro de compilação
Método ou membro de dados não encontrado

Coloquei anexo o mdb.
o formulário FRM_CADASTRO_DIARIAS que quero fazer o esquema no campo RestosAlfa01

Sabatel bom dia.

Segue em anexo o teu BD, deixei o campo visível para que possa ver, que ao salvar, o valor é inserido.  Isso acontece tanto no formulário como na tabela.

Qualquer coisa, estamos por aqui.

Abraços

VALEUUUUUUUUUUUU
VAIS GANHAR UMA ANTARCTICA ORIGINAL ... KKKK
BRIGADÃO MESMO CARA

O fórum agrade o teu retorno.

Sucesso.