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


    [Resolvido]Colocar o cursor no fim do campo

    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Colocar o cursor no fim do campo Empty [Resolvido]Colocar o cursor no fim do campo

    Mensagem  Assis 28/2/2014, 12:16

    Bom dia

    Tenho um form "Fvenda" com uma caixa de texto que ao fazer duplo click abre outro Form2. Este Form2 tem uma lisbox com muitos registos, e ao escolher um na lisbox o form2 fecha e o codigo do produta passa para o form FVenda.

    Assim
    Forms![Fvenda].Form.Controls![txtProdutoQtd] = lstProduto.Column(0) & "*"


    Então o form Venda no campo "txtProdutoQtd" aparece o código do produto, seguido do asterisco: Exemplo assim ... 12*

    Mas o foco fica neste "txtProdutoQtd" e o campo fica todo selecionado.

    Queria que o cursor ficasse no campo "txtProdutoQtd" mas a seguir ao asterisco.: Assim 12*|

    Obrigado.


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Convidado
    Convidado


    [Resolvido]Colocar o cursor no fim do campo Empty Re: [Resolvido]Colocar o cursor no fim do campo

    Mensagem  Convidado 28/2/2014, 13:13

    Olá Assis, coloque no evento ao receber foco do campo:
    Me.CampoAreceberFoco.SelStart = Len(Me.CampoAreceberFoco.Text)


    Última edição por betogivoni em 28/2/2014, 13:46, editado 1 vez(es)
    avatar
    Convidado
    Convidado


    [Resolvido]Colocar o cursor no fim do campo Empty Re: [Resolvido]Colocar o cursor no fim do campo

    Mensagem  Convidado 28/2/2014, 13:45

    Assis, uma correção. No evento ao fechar do formulário FProduto, coloca:
    Forms!Fvenda.Form.txtProdutoQtd.SelStart = Len(Forms!Fvenda.Form.txtProdutoQtd.Text)

    Obs: pode eliminar o evento ao receber foco do campo txtProdutoQtd do FVenda e a linha, Forms![Fvenda].Form.Controls![txtProdutoQtd].SetFocus do evento ao fechar do formulário FProduto
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Colocar o cursor no fim do campo Empty Re: [Resolvido]Colocar o cursor no fim do campo

    Mensagem  Assis 28/2/2014, 14:25

    Obrigado Beto


    .................................................................................
    *** Só sei que nada sei ***
    avatar
    Convidado
    Convidado


    [Resolvido]Colocar o cursor no fim do campo Empty Re: [Resolvido]Colocar o cursor no fim do campo

    Mensagem  Convidado 28/2/2014, 14:38

    Ok Assis, saudações pelo retorno

    Conteúdo patrocinado


    [Resolvido]Colocar o cursor no fim do campo Empty Re: [Resolvido]Colocar o cursor no fim do campo

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 16:23