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]Controlar edição

    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 124
    Registrado : 28/02/2012

    [Resolvido]Controlar edição Empty Controlar edição

    Mensagem  clemerson 2/6/2012, 03:39

    Olá pessoa,
    Preciso da ajuda dos senhores.Estou usando o seguinte código num formulário para controlar a edição do mesmo.


    for each ctl in me.controls
    if ctl.controltype=actextbox then
    ctl.enabled=0 ou -1
    end if
    next

    O problema é que ela só serve para as textboxes e no meu form tenho uma combobox.Como faze-la funcionar para as duas?
    Desde já obrigado.
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Controlar edição Empty Re: [Resolvido]Controlar edição

    Mensagem  criquio 2/6/2012, 03:41

    Try:

    if ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Then


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 124
    Registrado : 28/02/2012

    [Resolvido]Controlar edição Empty Re: [Resolvido]Controlar edição

    Mensagem  clemerson 3/6/2012, 01:15

    Olá Críquio,
    fiz o que você sugeriu...
    for each ctl in me.controls
    if ctl.controltype=actextbox or ctl.controltype=accombobox then
    ctl.enabled=0 ou -1
    end if
    next
    ... deu certíssimo!!!!!Valeu mesmo.
    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 124
    Registrado : 28/02/2012

    [Resolvido]Controlar edição Empty Re: [Resolvido]Controlar edição

    Mensagem  clemerson 3/6/2012, 01:25

    .........
    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 124
    Registrado : 28/02/2012

    [Resolvido]Controlar edição Empty Re: [Resolvido]Controlar edição

    Mensagem  clemerson 3/6/2012, 01:29

    ...

    Conteúdo patrocinado


    [Resolvido]Controlar edição Empty Re: [Resolvido]Controlar edição

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/5/2024, 06:28