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

    Bloquear edição de texto em textbox

    avatar
    lucianonetwork
    Novato
    Novato


    Respeito às regras : Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 17/10/2012

    Bloquear edição de texto em textbox Empty Bloquear edição de texto em textbox

    Mensagem  lucianonetwork 13/10/2015, 19:57

    Boa tarde,
    tenho um formulário com dados de clientes, cada cliente tem uma caixa de anotações onde descrevo o andamento do processo. Faço várias anotações na mesma caixa de texto, coloco data e hora para separar.

    Gostaria de saber se é possível, depois de digitar alguma coisa e salvar o texto fique bloqueado para que ninguém apague as anotações anteriores.

    Já vi algo parecido, mas eram usadas duas caixas de texto, vc escrevia na primeira e depois de confirmar o texto era enviado para a segunda caixa e ficava somente leitura.

    Obrigado.
    Nogaro513
    Nogaro513
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 482
    Registrado : 12/08/2013

    Bloquear edição de texto em textbox Empty Re: Bloquear edição de texto em textbox

    Mensagem  Nogaro513 13/10/2015, 21:31

    boa tarde Luciano Você pode colocar assim ao abrir seu formulário ou ao carregar seu Formulário  

    Me.suacxtexto.Locked = True

    e colocar  um botão para desbloquear sua cxtexto ao clicar
    Me.Nome.Locked = False

    exemplo

    Private Sub Form_Load()
    Me.suacxtexto.Locked = True

    End Sub


    Private Sub Comando212_Click()
    Me.suacxtexto.Locked = False

    End Sub

    abraços ! Nogaro

      Data/hora atual: 7/11/2024, 16:35