Preencher espacos a direita

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Preencher espacos a direita

Giovanni
não registrado

ENUNCIADA !

Postada em 29/10/2004 14:53 hs

Estou tentando preencher a direita de uma string um determinado numero de espacos em branco mas nao esta funcioando.

        For k = 0 To UBound(arrayFieldNames) - 1
            arrayFieldNames(k) = arrayFieldNames(k) & Right(" ", arrayFieldSizes(k))
            strField = strField & arrayFieldNames(k)
        Next k

estou tentando preencher a direita o valor em arrayFieldSizes(k) em espacos em branco, mas ele nao esta fazendo nada.

Obrigado,

Giovanni

ney_

SAO PAULO
SP - BRASIL

ENUNCIADA !

Postada em 29/10/2004 17:09 hs

espero que te ajude pois em meu projeto esta variavel tem que ter o tamanho de 30 caracter sendo assim se faltar eu completo com espaço se ultrapassa eu corto até a posição 30.

If Len(ADORS!CLNOMECLI) < 30 Then
                vnome = ADORS!CLNOMECLI & Space(30 - Len(ADORS!CLNOMECLI))
             ElseIf Len(ADORS!CLNOMECLI) > 30 Then
                vnome = Mid(ADORS!CLNOMECLI, 1, 30)
             Else
                vnome = ADORS!CLNOMECLI
             End If

Jose.Niz

CURITIBA
PR - BRASIL

ENUNCIADA !

Postada em 30/10/2004 19:19 hs

Você esta usando a função Right de forma errada. Ela serve para retornar "n" caracteres do lado direito de uma string... Nesse caso você deveria usar função String.

Se arrayFieldSizes(k) contiver o número de brancos:
arrayFieldNames(k) = arrayFieldNames(k) & String(arrayFieldSizes(k), " ")

Se arrayFieldSizes(k) contiver o tamanho de arrayFieldNames(k):

arrayFieldNames(k) = arrayFieldNames(k) & String(arrayFieldSizes(k) - Len(arrayFieldNames(k) ), " ")

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR


		CyberWEB Network Ltda. © Copyright 2000-2024 - Todos os direitos reservados. Powered by HostingZone - A melhor hospedagem para seu site