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]Campo requerido - Formulário

    wltsilva
    wltsilva
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 79
    Registrado : 29/11/2012

    [Resolvido]Campo requerido - Formulário Empty Campo requerido - Formulário

    Mensagem  wltsilva 14/7/2013, 16:42

    Pessoal.

    Tenho uma dúvida, já procurei aqui no fórum, mas não encontrei a solução para o meu problema.

    Em um formulário tenho um Campo X, que por meio de um código exibe uma mensagem falando que seu preenchimento deve ser efetuado (apenas avisa, não é obrigatório), até aí tudo bem.

    Porém eu gostaria de que essa mensagem  aparecesse se um outro campo estiver preenchido. Campo Y.

    Segue o código:
    Código:
    Private Sub Comando86_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If IsNull(Me.NomeCliente) Then
    MsgBox "O campo Nome deve ser preenchido.", vbOKOnly + vbInformation, "Sistema de Vendas"
    End If
    End Sub

    Obrigado!


    .................................................................................
    "Amigos de verdade não se separam apenas seguem caminhos diferentes."
    avatar
    Mrsilva
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 123
    Registrado : 03/11/2011

    [Resolvido]Campo requerido - Formulário Empty Re: [Resolvido]Campo requerido - Formulário

    Mensagem  Mrsilva 14/7/2013, 20:54

    Olá wltsilva.

    Se entendi caso um campo y seja preenchido e o campo x esteja em branco mostrar uma mensagem.

    tente assim:

    No evento após de atualizar do campo y

    If IsNull(Me.SeuCampoY) = false then

    If IsNull(Me.SeuCampoX) Then

    MsgBox "O campo Nome deve ser preenchido.", vbOKOnly + vbInformation, "Sistema de Vendas"

    End If

    End If

    End Sub




    wltsilva
    wltsilva
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 79
    Registrado : 29/11/2012

    [Resolvido]Campo requerido - Formulário Empty Obrigado

    Mensagem  wltsilva 17/7/2013, 00:57

    Obrigado primo!! rs

    Resolveu meu problema.

    Valeu


    .................................................................................
    "Amigos de verdade não se separam apenas seguem caminhos diferentes."

      Data/hora atual: 25/1/2022, 16:49