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]Adicionando regisrtro em campo desvinculado permanecendo texto anterior

    avatar
    Convidado
    Convidado


    [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior Empty Adicionando regisrtro em campo desvinculado permanecendo texto anterior

    Mensagem  Convidado 3/7/2011, 01:56

    Amigos tenho um campo desvinculado no form... (este campo ja contem texto)

    Tenho um campo Data, e preciso de um código que lance a data dando continuação no texto que ja existe

    Ex..

    Campo:
    Detento foi recolhido na data xx/xx/xx.

    Após atualizar do campo data
    Levar o texto: "Recebeu alvará em "' & me.CampoData & '"

    Ficando a caixa texto com os dois valores

    Detento foi recolhido na data xx/xx/xx. Recebeu Alvará em xx/xx/xx


    Se puderem ajuda fico grato
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior Empty Re: [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior

    Mensagem  vieirasoft 3/7/2011, 01:59

    nomecampo = nomec ampo.Value & vbCrLf & Me.nomecampo.Value & " - " & Format(Now, "dd/mm/yy hh:nn") & ": "
    avatar
    Convidado
    Convidado


    [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior Empty Re: [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior

    Mensagem  Convidado 3/7/2011, 02:05

    Vierão fiz assim...

    Private Sub txtAlvara_AfterUpdate()
    Dim txtTMP
    Dim x
    x = ".Recebeu alvará em_ "
    txtTMP = Me.txtObservacoes
    Me.txtObservacoes = txtTMP & x & Me.txtAlvara
    Me.CboDetento.SetFocus

    End Sub

    Como deixar um espaço na caracter em vermelho?
    avatar
    Convidado
    Convidado


    [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior Empty Re: [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior

    Mensagem  Convidado 3/7/2011, 02:14

    Ficou assim

    Private Sub txtAlvara_AfterUpdate()
    Dim txtTMP
    Dim x
    x = "Recebeu alvará em"
    txtTMP = Me.txtObservacoes
    Me.txtObservacoes = txtTMP & " " & x & " " & Me.txtAlvara
    Me.CboDetento.SetFocus
    MsgBox "A data do Alvará será lançada automaticamente no histórico", vbInformation, "Atenção"

    End Sub

    Grato Vieira
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior Empty Re: [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior

    Mensagem  vieirasoft 3/7/2011, 02:15

    Abração

    Conteúdo patrocinado


    [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior Empty Re: [Resolvido]Adicionando regisrtro em campo desvinculado permanecendo texto anterior

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 27/11/2024, 04:07