[Resolvido]buscando palavras

tenho um campo chamado custo medio

eu gostaria que ele transformasse o valor para letras

exemplo

M A R T E L I N H O
1 2 3 4 5 6 7 8 9 0

entao eu gostaria que buscasse as letras nesta palavra (MARTELINHO conforme o exemplo acima)

Boa noite,
Crie uma função que recebe como argumento o valor e substitui cada algarismo pela letra correspondente

nao entendi tem como vc postar um exemplo?

Alexandre Neves, ou alguem me ajuda ai..........

Boa tarde,
A função será do género:
function TransfNrLetra(dblNumero as double)as string
dim I as integer
for i=1 to len(dblnumero)
select case mid(dblnumero,1,1)
case 0
TransfNrLetra=TransfNrLetra & "O"
case 1
TransfNrLetra=TransfNrLetra & "M"
case 2
TransfNrLetra=TransfNrLetra & "A"
case 3
TransfNrLetra=TransfNrLetra & "R"
case 4
TransfNrLetra=TransfNrLetra & "T"
case 5
TransfNrLetra=TransfNrLetra & "E"
case 6
TransfNrLetra=TransfNrLetra & "L"
case 7
TransfNrLetra=TransfNrLetra & "I"
case 8
TransfNrLetra=TransfNrLetra & "N"
case 9
TransfNrLetra=TransfNrLetra & "H"
end select
next
end function

beleza, mas como eu representaria no campo ctomedio o valor de 112,20 que seria em letras : MMA,AO
como eu transfiro pra o campo com a virgula e ponto se tiver

Olá,
Que tal utilizar os dois ultimos numeros (letras) para os decimais!!!
Quando for converter de letras para numeros aplica a formatação.

Quando eu busco nesta funcao ai ele so busca a primeira

ex
150,00 fica assim = mmmmm e teria que ficar assim MEO,OO

Olá,
Pode postar base de dados com exemplo do que está a fazer?? e onde pretende fazer ?

Uma solução poderá ser utilizando o format
Outra solução caso a origem tenha sempre as duas casas decimais (mesmo que seja 00) e construir assim:

Código:

CampoFormatado = Left([CampoOriginal], Len([CampoOriginal])-2) & "," & Right([CampoOriginal],2)

--Não testado--Ficamos aguardar, abraço.

Olá,

Como ficou esta situação! O tópico até é interessante.

Os membros do fórum merecem e agradecem o retorno.

Aguardamos,

Abraço

ja resolvi

desculpa mas nao sabia q ainda estava aberto