®ogerVB
|
OSASCO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 19/08/2005 08:32 hs
Alguém sabe como eu posso declarar uma variável que, por exemplo, contenha no máximo e no mínimo 10 caracteres ou, se número, 5 dígitos... e assim por diante...
No caso de caracter, preencher o restante com espaço, e no número com zeros a esquerda!!!
Obrigado
|
|
|
|
|
|
|
|
Postada em 19/08/2005 09:54 hs
Olá Roger, Não existe esta funcionalidade em variáveis no VB, alias nunca ví em linguagem nenhuma, explique qual seu objetivo, derrepente existe uma outra maneira de você obter a solução. Abraços,
VBWEB - O Portal do Desenvolvedor
Agora o VBWEB também hospeda sites!
isto mesmo! conheçam os planos do VBWEB Hosting
|
|
|
|
®ogerVB
|
OSASCO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 19/08/2005 10:17 hs
É o seguinte, eu preciso exportar alguns dados para um arquivo texto... Este arquivo texto vai para um banco, e eles queren que seja delimitado o espaco de cada campo nesse arquivo texto, por exemplo:
Na linha 1, da coluna 1 até a 3 é o código do banco, da 4 até 10 é o código do cliente, e assim por diante, e com várias tabelas... No caso da string, eu até dei a seguinte solução:
sTexto = sTexto & Space(40 - Len(Mid(rsCli("nome"),1,40))) & Mid(rsCli("Nome"),1,40) 'Campo com 40
Isso resolve meus problemas com a string, mas não com os números, pois preciso preencer com zeros a esquerda.
Na linguagem C, ficaria mais ou menos assim a declaração da variavel
"%-3.3s" // Variável texto com 3 caracteres
"%-40.40s" // Variável texto com 40 caracteres
"%05.0f" // Variável número com 5 caracteres
|
|
|
|
|
|
Postada em 19/08/2005 10:37 hs
Kara, tenta o seguinte codigo, pode ser que te ajude. A funcao que vc precisa eh a String(NumCaracteres,Caracter) Acho que da forma abaixo deve te ajudar. sTexto = sTexto & String(40 - Len(Mid(rsCli("numero"),1,40)),"0") & Mid(rsCli("numero"),1,40) Qquer coisa, posta ai. Se der a gente ajuda. Valeu.
Dá-lhe internacional, unico campeao brasileiro invicto.
|
|
|
|
|
|
Postada em 19/08/2005 10:39 hs
zeros a esquerda:
right(string(<tamanho campo>,"0") & <variavel>,<tamanho campo>)
espaço eh soh usar o mid jogando o space(<tamanho do campo>) & <string>
"Quando estou fraco, aí então é que sou Poderoso"
|
|
|
|
®ogerVB
|
OSASCO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 19/08/2005 11:13 hs
Obrigado pessoal!!! (mais uma vez)
|
|
|
|
|
