MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Validar Campo

    avatar
    jleomr
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 42
    Registrado : 12/08/2014

    [Resolvido]Validar Campo Empty [Resolvido]Validar Campo

    Mensagem  jleomr 28/9/2016, 13:02

    Pessoal, Bom dia!


    Estou com dificuldade para validação de campo num formulário!

    Estou usando a função :

    Private Sub Btn_Salvar_Click()
    On Error GoTo Btn_Salvar_Click_Err
    If IsNull(Sit_Empresa) Then
    MsgBox ("Você não informou a Situação da Empresa, Ativo ou Inativo")
    DoCmd.CancelEvent
    End
    End If

    Acontece que campo Sit_Empresa é um campo numérico, e quando agente clica em novo registro o campo "Sit_Empresa" preenche com Zero, o que padrão do ACCESS.
    Como faço para ter uma função em que se for nulo ou igual ZERO o sistema não grave as informações?


    Aguardo,


    Leonardo
    Uilson Brasil
    Uilson Brasil
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1039
    Registrado : 23/04/2013

    [Resolvido]Validar Campo Empty Re: [Resolvido]Validar Campo

    Mensagem  Uilson Brasil 28/9/2016, 14:59

    Código:
    If IsNull(Sit_Empresa) or Sit_Empresa = "" Then
     MsgBox"Você não informou a Situação da Empresa.", vbCritical, "Sistema"
     Sit_Empresa.Setfocus
    End If


    .................................................................................
    ::: Uilson Brasil
    ::: Design in Microsoft Access
    avatar
    jleomr
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 42
    Registrado : 12/08/2014

    [Resolvido]Validar Campo Empty Validar Campo

    Mensagem  jleomr 28/9/2016, 20:48

    Resolvido, Obrigado!

    Conteúdo patrocinado


    [Resolvido]Validar Campo Empty Re: [Resolvido]Validar Campo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 03:13