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

    String Fixa com alinhamento a direita

    avatar
    carniel.ass.info
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 14/09/2012

    String Fixa com alinhamento a direita Empty String Fixa com alinhamento a direita

    Mensagem  carniel.ass.info 21/10/2022, 19:29

    Meus caros, recorro ao help desse prestigiado forum.

    Pesquisei e não encontrei a cereja do bolo que falta no meu projeto de emissão de cupons não fiscais, segue a duvida:

    Tenho uma "String" fixa, definida da seguinte forma:

    Dim StrCdpgFmpg As String * 12

    As vezes vou alimentar essa String com 8 caracteres / as vezes com 6 / as vezes com 4:

    Dentro do "limite" de 12 fica respectivamente assim:

    8 caracteres - na string vai: "12345678bbbb (b = brancos) - alinhado a esquerda
    queria que ficasse assim: "bbbb12345678" - preciso assim, alinha a direita

    6 caracteres - na string vai: "123456bbbbbb (b = brancos) - idem
    queria que ficasse assim: "bbbbbb123456" - idem

    4 caracteres - na string vai: "1234bbbbbbbb (b = brancos) - idem
    queria que ficasse assim: "bbbbbbbb1234" - idem

    Com isso teria um alinhamento perfeito a direita da string fixa

    é possível ?

    Carniel
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3491
    Registrado : 13/12/2016

    String Fixa com alinhamento a direita Empty Re: String Fixa com alinhamento a direita

    Mensagem  Alexandre Fim 21/10/2022, 20:23

    Você pode usar dessa forma:
    Mude: Dim StrCdpgFmpg As String *12
    Para: Dim StrCdpgFmpg As String

    StrCdpgFmpg = 123456
    '-- Nesta linha já fixo o tamanho da string em 12
    StrCdpgFmpg = Space(12 - Len(StrCdpgFmpg)) & StrCdpgFmpg




    É isso

    Espero ter ajudado


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    String Fixa com alinhamento a direita Setinf11
    Sistemas e Tecnologia Ltda

      Data/hora atual: 7/11/2024, 23:29