[duvida]como Substituir Letras Por Outras

jonheloy
em Resolvidos

jonheloy

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 12/08/07Posts: 17Char no Tibia: Andrios Celanir

Olá estou iniciando em programação se você poderem me ajudar agradecerei.

 

Tenho dois TextBox, em um escrevo algum texto.Ex: OI, ao clicar em um botão irá aparecer no outro AU, ou seja, o O foi substituido por A e o I por U.

 

Só gostaria do codigo e que me ensinassem a configura-lo

 

Obrigado

soulblaster

avatar
Cavaleiro
Cavaleiro

INFOS

Grupo: CavaleiroRegistrado: 22/10/05Posts: 196

Hiho!

 

entao, para substituir letra por letra eu não sei (ainda ^^'),

voce precisará utilizar funçoes para achar a letra e entao substitui-la.

mas você pode substituir o texto inteiro mesmo:

TextBox.text = "AU"

 

cya ^^

Assinatura feita por Kilerzinhow:
untitled3mg3.jpg
| Wey.Ctba | Wey.Ctba | Rafix | UnderNight | Xedegux |

bizugo

avatar
Campones
Campones

INFOS

Grupo: CamponesRegistrado: 27/10/05Posts: 71

Você pode usar a função Replace(), é facil de usar.

 

Claro, esse replace() não é optminizado, para optminizar tem que pesquisar, não se revela tais segredos :)

 

Um exemplo:

replace("Frase", "oi", "au")

 

Declaração:

replace(Expression As String, Find As String, Replace As String, [start As Long = 1], [Count As Long = -1], [Compare As VbCompareMethod = vbBinaryCompare]) As String

PQP PAREM DE MANDA SPAMM EM PM OU PEDINDO CHEAT MEU! CHEAT É ILEGAL! QUEM QUISER PROCURE! NÃO AQU!

Sprit

Serviços Prestados ao XTibia
avatar
Artesão
Artesão

INFOS

Grupo: ArtesãoRegistrado: 29/12/06Posts: 111Char no Tibia: King Unagi

replace(Expression As String, Find As String, Replace As String, [start As Long = 1], [Count As Long = -1], [Compare As VbCompareMethod = vbBinaryCompare]) As String

 

Expression=Frase ou texto que você quer alterar

Find= caractere ou palavra que você que trocar

Replace=substituto dos valores (Ex. Find=A e Replace=B, toda letra A que existir na Expression sera trocada por B)

Start=numero do caractere onde vc quer iniciar a pesquisa (Ex. Start=5, começa na quinta letra da palavra)

Count=Quantas vezes encontrou o Find dentro de Expression

Compare=Metodo de Comparação (vbBynary = A é diferente de a (case sensitive), VbText=não case sensitivy


"Se tem jeito fazemos, se não tem jeito, inventamos um jeito!! (By Drak)"


Furabio

Why be a king.. when you can be a god
avatar
Conde
Conde

INFOS

Grupo: CondeRegistrado: 08/04/15Posts: 962Gênero: Masculino

Movido para a área correta.

EQD4Qy4.gif