Manipulação de strings!!!


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Manipulação de strings!!!

Leolima

PORTO ALEGRE
RS - BRASIL

Postada em 23/11/2004 14:58 hs

Boa tarde a todos!!!

- Tenho uma grid que é prenchida por um banco de dados...

- tenho uma celula que quero que caiba 110 caracteres somente!!! - no bd ele ja esta configurado para receber apenas 110 caracteres

Bom a questão é a seguinte:

Quero que apartir de um determinado evento ele me escreva tb nesta celula "em andamento".

para isto eu tenho que pegar o que ja esta escrito tipo:

"Joao manuel da silva"

calcular o numero de caracteres que tem este nome somar com o numero de caracteres que tem "em andamento", tirar de 110.

Bom o que sobrou eu quero que seja convertido em espaços!!!

exemplo:

normal : joao manuel da silva

como eu quero: joao manuel da silva - em andamento

caso exeda 100: joao manuel da silva pereira - em andam...

Grato aguardando resposta!!!

"A mente que se abre para novas idéias jamais volta ao seu tamanho original".
(Albert Einstein)

----------------------------------------------PII-450-256MB-GForceII-64-TV/out-Soyo----- ----Agora com Framework 1.1 + Visual Studio 2003 + WinXP. Acredite se quiser!----
Leonardo Cassuriaga                                                            Fone:(51) 96394735
Tecnico Informática                              __o                              Programador VB6.0
Programador Web                             _>/,                                          DBA Access
-------------------------------------------(+)/(+)__________P_o_r_t_o__A_l_e_g_r_e_RS__
Charles   Darwin : As   espécies   que   sobrevivem   não   são   as   mais   fortes,    mas as que melhor conseguem se adaptar às mudanças!
-----------------------------------------------------------------------------------------------

Sandro
não registrado

Postada em 23/11/2004 16:21 hs

Você pode usar um dos recursos mais antigos do BASIC (é do DOS mesmo): a função LSET:

Dim Mascara as String, Texto as String

Mascara=Space(20) <-- Aqui você colocará 110 ao invés de 20 do exemplo

Texto="José da Silva"

Lset Mascara = Texto

Debug.Print "*" & Mascara & "*"

Resultado: *José da Silva * <-- Perceba que entre os dois asteriscos existem 20 caracteres (texto + espaços)

Espero que isso te ajude.

Sandro.

Leolima
não registrado

Postada em 24/11/2004 14:29 hs

Valeu ai Sandro!!!

Vou ter que dar uma trabalhada,mas pelo que testei o codigo é isto mesmo!!!

Valeu

Página(s): 1/1