(Resolvido) Tornar campos obrigatórios

[RRH]

Como eu faço pra impedir que o usuário do meu sistema crie um novo registro sem preencher todos os campos do formulário? Estão deixando campos do formulário em branco e criando novos registros. Quero dar uma engessada o sistema.

Editado Janeiro 18, 2010 por RRH

[Leandro Abbade]

Boa noite amigo,

Veja este exemplo?

http://www.professorlar.com/contarcliques3...aixadeTexto.zip

[RRH]

Boa noite amigo,

Veja este exemplo?

http://www.professorlar.com/contarcliques3...aixadeTexto.zip

Obrigado era exatamente isso. Agora você pode me dizer se tem como tornar obrigatório apenas alguns campos?

[MrMALJ]

Não olhei o exemplo do amigo Abade mais na estrutura da própria tabela você pode impedir valores nulos em certos campos... ok.

[RRH]

Não olhei o exemplo do amigo Abade mais na estrutura da própria tabela você pode impedir valores nulos em certos campos... ok.

Ok, mas gostaria de algo mais personalizável como o exemplo acima. Obrigado.

[Leandro Abbade]

Bom dia amigo,

Veja se consegue tratar as mensagens de erro através deste:

http://www.professorlar.com/contarcliques3...ero_do_erro.zip

[RRH]

Boa noite amigo,

Veja este exemplo?

http://www.professorlar.com/contarcliques3...aixadeTexto.zip

Acabei implementando o seu exemplo aqui no meu bd, mas tem dois problemas:

1 - O bd possui campo numeração automatica que no forçar o sistema a fechar ele "engole" o número sequencial. Ex: se estiver no 1001 e forçar o bd a fechar ele vai abrir um novo registro com nr 1002 e o 1001 não vai estar visivel, entendeu?

2 - Após dar todos os ok nas mensagens que são exibidas informando os campos obrigatórios retorna msg de erro em tempo de execução 2501. O que é isso?

[Leandro Abbade]

Bom dia amigo,

Poste o seu BD aqui para os amigos do fórum tentar te ajudar.

[RRH]

Bom dia amigo,

Poste o seu BD aqui para os amigos do fórum tentar te ajudar.

O problema é que tem dados nele que não podem ser publicados. Será que não tem como além de tornar o preenchimento do formulário obrigatório bloquear o fechamento do bd sem terminar os lançamentos dos dados do formulário?

[RRH]

Ainda não consegui resolver o problema aqui. Baseado no exemplo do Leandro Abbade como fazer para que não seja possível que o bd seja fechado sem preencher todos os campos?

[RRH]

Fiz algumas mudanças e aparentemente vai funcionar! Preciso saber agora como fazer o código abaixo além de identificar caixas de texto nulas identificar tambem caixas de combinação nula:

Dim ctl As Control
    For Each ctl In Form.Controls
        If ctl.ControlType = acTextBox Then
            If IsNull(ctl) Or Len(ctl) = 0 Then
                MsgBox "Prencha o controle " & ctl.Name, _
                        vbExclamation, "Controle obrigatório"
                Cancel = True  'Cancela o evento, impedindo a atualização.
            End If
        End If
    Next
    
Sai:
    Set ctl = Nothing ' Libera memória.

[Alexandre Neves]

Deve funcionar assim:

Dim ctl As Control

For Each ctl In Form.Controls

If ctl.ControlType = acTextBox Then

If IsNull(ctl) Or Len(ctl) = 0 Then

MsgBox "Prencha o controle " & ctl.Name, _

vbExclamation, "Controle obrigatório"

Cancel = True 'Cancela o evento, impedindo a atualização.

End If

ElseIf ctl.ControlType = acComboBox Then

If IsNull(ctl) Or Len(ctl) = 0 Then

MsgBox "Prencha o controle " & ctl.Name, _

vbExclamation, "Controle obrigatório"

Cancel = True 'Cancela o evento, impedindo a atualização.

End If

End If

Next

Sai:

Set ctl = Nothing ' Libera memória.

[RRH]

Alexandre Neves, agora deu certinho. Obrigado a todos...