[Resolvido]Obrigar preenchimento de sbForm antes de salvar formulario

Aqui  está um exemplo.

Abraços

Nb

boa noite
puderem me dar algum auxílio com este problema eu serei grato.
Tentei implementar o form seguindo os exemplos que me passaram, porem não obtive sucesso. Não sei aonde estou errando em seguir os exemplos, mas não funciona. Se

Desde já obrigado pela empenho.

Tentei implementar algo conforme os dois exemplos apresentados, porem, não obtive sucesso.

atualmente o maior avanço que tive foi no codigo original, onde ele até executa a pare else do codigo, porem, quanto tento referenciar uma das variaveis da tabela iPedidos elo não localiza o campo e da erro .


O codigo atualmente esta assim .

Private Sub Comando35_Click()


Forms!CadPedido.IPedido.SetFocus

If IsNull(Me.IPedido!CodPedFabrica) = True Then

 MsgBox "Favor preencher os intens do pedido!", vbInformation, "ATENÇÃO"
 
   Me.CodPedido.SetFocus
   
   
Else

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

MsgBox "Pedido salvo com sucesso!", vbInformation, "Atenção"

DoCmd.Close
End If



End Sub


Se puderem me dar alguma sugestão de como efetuar  essa referencia eu agradeço .

Este é o modelo do sistema que estou desenvolvendo. É bem básico, mas se puderem dar uma olhada agradeço.

Estou assinando para participar das discussões.
Em breve retorno

Amigo Marcos, tudo bem!
O exemplo de Noobezinho é o mais prático que vejo. Basta usar o código em um botão do formulário para forçar o deslocamento do cursos para o subform e ao mesmo tempo fazer a busca por campos não preenchidos.

Marcos

Aqui está teu aplicativo modificado

Algumas ponderações :
Procure usar prefixos no objetos, tblPedidos, tbl_ItensPedidos, frmPedidos, frm_Pedidos, qryMinhaConsulta ou ConsPedidos, etc...
Isso ajuda a você na hora de ler os códigos e a outros programadores que irão ler esses códigos.

Teu aplicativo:
Sugiro que use o CodPedido como autonumeração na tabela pedido e numero inteiro longo na tabela ItensPedidos,
assim não precisará digitar  esse código
Se fizer isso, modifique os códigos VBA desse campos de texto para nume rico, retirando as aspas simples deles.
A função TestaCampos() só verificará se os campos estão preenchidos, aqueles que tiver a Marca  "t" (sem as aspas) na folha de propriedades.
Essa função só testará os campos do formulário principal.

Os campos do subformulario itenspedidos serão testado na propriedade Ao Sair de cada controle. Veja na folha de propriedades e no módulo classe do formulário a função.
Como teu formulário tem os botões salvar e fechar, veja que ao clicar no botão fechar os mesmo chama o código do botão salvar.
Desative o botão Fechar do formulário ( o X do cabeçalho), assim o usuário só poderá fecha-lo clicando num dos botões Salvar e Fechar.

Noob

Amigo Noobezinho!
Tudo blz?

Na verdade o aplicativo é do Marcos Julio.

De qualquer forma, vou baixar para estudar os códigos.

Obrigado

Verdade, eu vi um post e o nome de outro.

Obrigado João


Nb

Gostaria de agradecer a todos pelo empenho e auxilio na solução. Obrigado ae .. Me ajudaram muito !!

Valeu o retorno Marcos

Boa sorte !!


Nb