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]Campo data necessita Duplo Enter para passar próximo campo

    Assis
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009
    • Mensagem nº1

    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Empty [Resolvido]Campo data necessita Duplo Enter para passar próximo campo

    Mensagem  Assis 17/2/2020, 09:05

    Bom dia Amigos

    Este campo Data é óptimo para quem tem de digitar muitas vezes a data.

    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    • Ir para o topo
    Marcelo David
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011
    • Mensagem nº2

    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Empty Re: [Resolvido]Campo data necessita Duplo Enter para passar próximo campo

    Mensagem  Marcelo David 17/2/2020, 11:39

    Grande Assis, bom dia!

    Evento KeyPress do campo txt_data:

    Código:
       Dim ws As Object 'Declaro uma variável do tipo objeto
        
        Set ws = CreateObject("WScript.Shell") 'Crio um objeto do tipo VBS
        
        If KeyAscii = 13 Then 'Caso a tecla pressionada for Enter
            ws.SendKeys "{TAB}" 'Envio a tecla TAB para o foco ir para o próximo campo indexado
        End If
        
        Set ws = Nothing 'Apaga o objeto da memória

       'Uso o SenKeys do VBS e não do VBA porque há um bug nunva corrigido em que ao usar o sendkeys, é acionado a tecla NumLock
       'do teclado. E pelo VBS não há esse problema.

    Obs.: A propriedade Visualizar teclas do formulário em questão deve está como Sim.


    .................................................................................
    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Marcel11
    • Ir para o topo
    Assis
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009
    • Mensagem nº3

    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Empty Re: [Resolvido]Campo data necessita Duplo Enter para passar próximo campo

    Mensagem  Assis 17/2/2020, 11:58

    Obrigado Marcelo


    .................................................................................
    *** Só sei que nada sei ***
    • Ir para o topo
    Marcelo David
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011
    • Mensagem nº4

    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Empty Re: [Resolvido]Campo data necessita Duplo Enter para passar próximo campo

    Mensagem  Marcelo David 17/2/2020, 12:04

    Grato pelo retorno, esquecestes o Resolvido Wink


    .................................................................................
    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Marcel11
    • Ir para o topo
    Assis
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009
    • Mensagem nº5

    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Empty Re: [Resolvido]Campo data necessita Duplo Enter para passar próximo campo

    Mensagem  Assis 17/2/2020, 12:25

    Ops

    Falhou no enter


    .................................................................................
    *** Só sei que nada sei ***
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº6

    [Resolvido]Campo data necessita Duplo Enter para passar próximo campo Empty Re: [Resolvido]Campo data necessita Duplo Enter para passar próximo campo

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 21/11/2024, 14:41