• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

SkYmb3r

[VB6] Conversor de letras

19 mensagens neste tópico

Boas.

Este programa é muito simples mas é capaz de dar muito jeito, eu próprio já andei á procura de algum programa que fizesse isto e nada...,então decidi fazer porque dá jeito ás vezes para trabalhos.

O que o programa faz é converter o texto que é inserido numa caixa para letras grandes ou pequenas noutra caixa...

Testem  :)

http://rapidshare.de/files/25969502/Conversor_de_letras.exe.html

Fica o código para quem quiser:

Private Sub Command1_Click()
Text1 = UCase(Text2)
End Sub

Private Sub Command2_Click()
Text1 = LCase(Text2)
End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Command4_Click()
Text1 = Empty
Text2 = Empty
End Sub

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ya o programa dá bastante jeito nalgumas situações.

Críticas/Sugestões:

1. As letras a preto nao se lê bem devido à imagem de fundo.

2. Penso que a caixa onde inserimos para a conversão deveria ser a 1ª.

De Resto nada a dizer, just quipe da gud uôrque :)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ya o programa dá bastante jeito nalgumas situações.

Críticas/Sugestões:

1. As letras a preto nao se lê bem devido à imagem de fundo.

2. Penso que a caixa onde inserimos para a conversão deveria ser a 1ª.

De Resto nada a dizer, just quipe da gud uôrque :D

Obrigado :)

Em relação á cor das letras...só dá para escolher aquelas cores que estão em ''foreColor'' -> ''Palette'' ? não temos acesso a todas as cores e aos niveis de luz? (não sei  se é assim que se diz mas é aquela banda onde se pode escolher as cores todas, mais claras e escuras)

A cor das letras dos botões só dá para ficar preto?

Obrigado  :)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Letras grandes? Letras pequenas?

Troca isso por letras maiúsculas e letras minúsculas... fica mais profissional  :D

Mas de resto tá muito fixe!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

tens razão, nem tinha reparado nisso, obrigado  :D já editei o link do post acima com essa alteração  :D

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Podiam-me indicar um caso onde esta aplicação fosse util? Já 2 pessoas disseram que em alguns casos mas não consegui descobrir nenhum :s

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

isso também dá para fazer facilmente para web, com um CSS

text-transform:uppercase;

ou

text-transform:lowercase;

ele faz diretamente todo o texto que digitares ele transforma em uppercase ou lowercase conforme o CSS que escolherem.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Podiam-me indicar um caso onde esta aplicação fosse util? Já 2 pessoas disseram que em alguns casos mas não consegui descobrir nenhum :s

Se estás a referir a "estar muito fixe", isso não significa que me tenha sido útil. O programa até me parece estar bem construído, está claro. Embora tenha utilidade ou não, é um projecto de programação, que o autor pede uma opinião sobre ele.

Se não te referiste a isso, peço desculpa  :-[ :down:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Podiam-me indicar um caso onde esta aplicação fosse util? Já 2 pessoas disseram que em alguns casos mas não consegui descobrir nenhum :s

Se estás a referir a "estar muito fixe", isso não significa que me tenha sido útil. O programa até me parece estar bem construído, está claro. Embora tenha utilidade ou não, é um projecto de programação, que o autor pede uma opinião sobre ele.

Se não te referiste a isso, peço desculpa  :-[ :down:

Repara nas quotes abaixo:

Este programa é muito simples mas é capaz de dar muito jeito
a o programa dá bastante jeito nalgumas situações.

Como referi, 2 pessoas (incluindo o autor da aplicação) disse que o programa era útil em alguns casos. O que eu pedi foi que me indicassem um caso onde essa aplicação fosse então útil, porque já tentei ver onde poderia aplica-la e não descobri.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas,

Pode ser útil para trabalhos, por exemplo estás a recolher informação em sites para um trabalho, e queres copiá-los para um word, imagina que só encontras textos em letras maiúsculas?

Um dia isso aconteceu-me.., andei á procura de algum programa que converte-se as letras mas não encontrei.. acho que o word faz isso mas não sei bem onde.. nesse caso o programa seria útil, não estou a ver outros casos  :P

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

O Word traz logo uma funcionalidade para isso, e encontra-se muito facilmente.  :biggrin:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

ya, e so seleccionar o texto, e ir a ferramentas -> formatar -> maiusculas

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Era no minimo estranho se uma ferramenta como o Word, não tivesse essa funcionalidade  :P

Cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Na onda do prog, vejo mais utilidade nesta função (ou não  :P)


Dim sNew as String
Dim sOld as String

sNew = StrConv$(sOld, vbProperCase)

O que esta func faz é passar para Maiusculas a primeira letra de cada string...

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas, podia alguém disponibilizar novamente o programa ;) é que neste momento eu estou a precisar disso e o CSS dá-me imenso trabalho porque é para trabalhar na base de dados...

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas, podia alguém disponibilizar novamente o programa ;) é que neste momento eu estou a precisar disso e o CSS dá-me imenso trabalho porque é para trabalhar na base de dados...

O source esta no primeiro tópico !

Private Sub Command1_Click()
Text1 = UCase(Text2)
End Sub

Private Sub Command2_Click()
Text1 = LCase(Text2)
End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Command4_Click()
Text1 = Empty
Text2 = Empty
End Sub

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora