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

3 participantes

    [Resolvido]Não sair do campo sem dados

    avatar
    Jairo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 117
    Registrado : 09/05/2013

    [Resolvido]Não sair do campo sem dados Empty [Resolvido]Não sair do campo sem dados

    Mensagem  Jairo 6/9/2013, 13:20

    Bom  Dia Galera,
     
    Olha eu mais uma vez aqui, em primeira mão que agradecer pelo apoio e que todas as dicas de ajuda tem dado certo.
     
    queria mais uma vez um ajuda,
     
    tenho uma frm de saída de dados com campos " referencia" " quantidade" porem se eu selecionar o campo quantidade sem antes entrar com a referencia o fm aceita, porei eu queria que ele não aceitasse. ou seja quando eu selecionar entrada de quantidade sem antes entrar com dados no campo referencia ele não permita o acesso.
     
    mais uma vez obrigado..

    Galera!

    Complementando, já agradecendo a dica, a questão é que esse é um sub formulário,

    quando insiro o código

    If IsNull(CodigoProduto) Or Me.CodigoProduto = "" Then
    MsgBox "Esse Campo é de Preenchimento obrigatório!", , "Atenção!!!"
    DoCmd.CancelEvent
    End If

    se eu não for precisa executar a saída do produto, isto é, se eu entrar e sair do formulário a mensagem aparecer assim mesmo.

    qual seria um forma em complemento.

    Agradeço,


    Última edição por Jairo em 6/9/2013, 15:34, editado 1 vez(es)
    avatar
    ifahidalgo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 13/10/2011

    [Resolvido]Não sair do campo sem dados Empty Re: [Resolvido]Não sair do campo sem dados

    Mensagem  ifahidalgo 6/9/2013, 14:06

    acho que esse codigo pode ajudar

    no evento "ao sair" insira

    If IsNull(txtreferencia) Or Me.txtreferencia = "" Then
    MsgBox "Esse Campo é de Preenchimento obrigatório!", , "Atenção!!!"
    DoCmd.CancelEvent
    End If


    espero ter ajudado
    avatar
    Jairo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 117
    Registrado : 09/05/2013

    [Resolvido]Não sair do campo sem dados Empty Nova Duvida entrada Obrigatoria

    Mensagem  Jairo 6/9/2013, 18:50

    Deu certo Hifaldago, tem apenas um contra tempo, quando eu entro no frm e não faço nenhuma saí e vou fechar o frm vazio, a mensagem aparecer “Esse campo e de preenchimento obrigatório”. E não deixa fechar o frm

    Como Faço para isso não acontecer
    Agradeço,
    avatar
    ifahidalgo
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 381
    Registrado : 13/10/2011

    [Resolvido]Não sair do campo sem dados Empty Re: [Resolvido]Não sair do campo sem dados

    Mensagem  ifahidalgo 6/9/2013, 19:37

    esse campo seria somente para nível de consulta, ou você adicionaria registro em tabela.
    Pode fazer o seguinte, no evento ao clicar do botão sair do form.

    me.txtreferencia = "0"

    junto com a codificação de sair do botão.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10772
    Registrado : 04/11/2009

    [Resolvido]Não sair do campo sem dados Empty Re: [Resolvido]Não sair do campo sem dados

    Mensagem  JPaulo 6/9/2013, 20:51

    Complemente com o Dirty

    If (IsNull(Me.txtreferencia) And Me.Dirty) Or (Me.txtreferencia = "" And Me.Dirty) Then


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Não sair do campo sem dados Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Não sair do campo sem dados Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Não sair do campo sem dados Folder_announce_new Instruções SQL como utilizar...
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10772
    Registrado : 04/11/2009

    [Resolvido]Não sair do campo sem dados Empty Re: [Resolvido]Não sair do campo sem dados

    Mensagem  JPaulo 10/9/2013, 20:42

    Resolvido por falta de retorno.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Não sair do campo sem dados Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Não sair do campo sem dados Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Não sair do campo sem dados Folder_announce_new Instruções SQL como utilizar...

      Data/hora atual: 5/12/2022, 01:13