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]campos obrigatorios atraves de escolha

    avatar
    HSP
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 28
    Registrado : 13/10/2011

    [Resolvido]campos obrigatorios atraves de escolha Empty campos obrigatorios atraves de escolha

    Mensagem  HSP 31/10/2011, 23:55

    Boa noite

    tenho o seguinte probleminha, em formulario tenho um campo chamado Mesa, que tem em sua combox as seguintes opções 1;2;3;4;5 e mais dois campos um chamado cadeira e outro suporte, se eu escolher a mesa 1, terei que escolher obrigatoriamente a cadeira e o suporte, se eu escolher mesa 2, terei que escolher obrigatoriamente a cadeira, e não posso escolher suporte, se eu escolher a mesa 3, não posso escolher nem cadeira nem suporte, ufaaa!! alguem pode me ajudar? desde ja agradeço
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]campos obrigatorios atraves de escolha Empty Re: [Resolvido]campos obrigatorios atraves de escolha

    Mensagem  Alexandre Neves 1/11/2011, 10:17

    Bom dia,

    Antes de gravar o registo, coloque:
    Select case CxcMesa
    Case "1"
    If Isnull(TxtCadeira) TxtCadeira="" then
    msgbox "O campo cadeira tem de ser preenchido."
    TxtCadeira.setfocus
    End If
    If isnull(TxtSuporte) or TxtSuporte="" then
    msgbox "O campo suporte tem de ser preenchido."
    TxtSuporte.setfocus
    end if
    case "2"
    If Isnull(TxtCadeira) TxtCadeira="" then
    msgbox "O campo cadeira tem de ser preenchido."
    TxtCadeira.setfocus
    End If
    If Not (isnull(TxtSuporte) or TxtSuporte="") then
    msgbox "O campo suporte não pode preenchido. Vai ser desmarcado."
    TxtSuporte=Null
    end if
    case "3"
    If Not (Isnull(TxtCadeira) TxtCadeira="") then
    msgbox "O campo cadeira não pode preenchido. Vai ser desmarcado."
    TxtCadeira=Null
    End If
    If Not (isnull(TxtSuporte) or TxtSuporte="") then
    msgbox "O campo suporte não pode preenchido. Vai ser desmarcado."
    TxtSuporte=Null
    end if
    End select

    Obs.: Precisa para sua necessidade ou trata-se de teste aos seus conhecimentos?
    avatar
    HSP
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 28
    Registrado : 13/10/2011

    [Resolvido]campos obrigatorios atraves de escolha Empty Re: [Resolvido]campos obrigatorios atraves de escolha

    Mensagem  HSP 3/11/2011, 20:08

    Olá, vou testar aqui e aviso o resultado

    Trabalho com o access há 4 anos, na cidade onde resido não tem cursos especifico em access, na empresa que trabalho tento mostrar a eficiencia do access, entao surge muitos desafios, e procuro na net, esta duvida é uma curiosidade que tenho, então, tem duvidas que é por curiosidade outras que nao consigo fazer mesmo.
    avatar
    HSP
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 28
    Registrado : 13/10/2011

    [Resolvido]campos obrigatorios atraves de escolha Empty Re: [Resolvido]campos obrigatorios atraves de escolha

    Mensagem  HSP 3/11/2011, 22:53

    Nao consegui resolver, coloquei o codigo no campo, mas sem sucesso.

    é assim:

    Tenho uma tabela chamada mesa, que é alimentada por 11 mesas, ex: 1;2;3;4;5;6,... tenho uma tabela chamada cadeira que é alimentada por 22 cadeiras, ex: 1,2,3,4,5,..., tenho uma terceira tabela que tem o campo mesa e cadeira, nesses campos criei a combobox, porem queria melhorar ou saber se tem como, por exemplo, escolhi a mesa 1 para ela esta relacionado apenas a cadeira 2,6,9 para a mesa 4, náo tem cadeira, ou seja, o campo fica inativo, entendeu?
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8449
    Registrado : 05/11/2009

    [Resolvido]campos obrigatorios atraves de escolha Empty Re: [Resolvido]campos obrigatorios atraves de escolha

    Mensagem  Alexandre Neves 4/11/2011, 21:51

    Não, não entendi

    coloque as tabelas com dados significativos e descreva o que pretende
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]campos obrigatorios atraves de escolha Empty Re: [Resolvido]campos obrigatorios atraves de escolha

    Mensagem  vieirasoft 14/11/2011, 11:48

    Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.

    Conteúdo patrocinado


    [Resolvido]campos obrigatorios atraves de escolha Empty Re: [Resolvido]campos obrigatorios atraves de escolha

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 2/5/2024, 09:58