MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    iniciar formulário com todas as caixas de texto bloqueadas

    Compartilhe

    juliobertoso
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 23/10/2017

    iniciar formulário com todas as caixas de texto bloqueadas

    Mensagem  juliobertoso em 7/6/2018, 15:30

    ola,


    qual o comando para o vba verificar o que é caixa de texto e iniciar o form com todas elas bloqueadas, com isso eu nao preciso programar uma a uma, pois são muitas

    grato
    avatar
    CassioFabre
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 728
    Registrado : 18/01/2013

    Re: iniciar formulário com todas as caixas de texto bloqueadas

    Mensagem  CassioFabre em 7/6/2018, 16:58

    Boa tarde,

    No evento Ao Abrir do formulário coloque:
    Código:
        Dim ctl As Control
       
        For Each ctl In Me.Controls
            If TypeOf ctl Is TextBox Then
                ctl.Enabled = False
            End If
        Next

    Abraço.


    .................................................................................
    Só não tem código pra morte!

      Data/hora atual: 19/10/2018, 12:38