LETRAS MAISCULAS

GIOGOMES 30/11/2006 10:18:55
#187124
Quero q no cadastro de Clientes, Fique so a primeira letra do nome e sobrenome em maiuscula.
ex. sebastião da silva barbosa
Sebastião Da Silva Barbosa

Muito obrigado pela atenção
HUGOSSOUZA 30/11/2006 10:48:35
#187131
Dim A
A = "sebastião da silva barbosa"
MsgBox StrConv(A, 1) ' = SEBASTIÃO DA SILVA BARBOSA
MsgBox StrConv(A, 2) ' = sebastião da silva barbosa
MsgBox StrConv(A, 3) ' = Sebastião Da Silva Barbosa
3LTON 30/11/2006 11:00:05
#187133
De uma olhada aki
http://www.vbmania.com.br/vbmania/vbmdetail.php?varID=3709&TxtSearch=maiuscula&CmbSort=ftitulo&varPagina=1

ou de uma pesquisada, tem conteudo no site.

Espero ter ajudado.
F001E 30/11/2006 11:12:24
#187137
Private Sub Form_KeyPress(KeyAscii As Integer)

KeyAscii = Asc(UCase(Chr(KeyAscii)))

End Sub

...só esqueça de mudar a opção KeyPreviw para True....
USUARIO.EXCLUIDOS 30/11/2006 12:55:52
#187179
Giovani,

Eu fiz uma rotina que faz isso. Veja em:

http://www.vbmania.com.br/vbmania/vbmdetail.php?varID=5554
USUARIO.EXCLUIDOS 02/12/2006 08:48:10
#187556
amigo entre nesse site aqui ele tem todos os codigos para vb

http:\\www.macoratti.net

se não encontrar nada me de um toque fmz abraços
USUARIO.EXCLUIDOS 02/12/2006 09:05:08
#187557
cara, se resolveu fecha o topico!
CAPITAO.GARCIA 02/12/2006 09:07:09
#187558
Citação:

Dim A
A = "sebastião da silva barbosa"
MsgBox StrConv(A, 1) ' = SEBASTIÃO DA SILVA BARBOSA



strconv é bao
USUARIO.EXCLUIDOS 02/12/2006 09:25:07
#187561 Resposta escolhida
Colega eu fiz uma função que converte para maiúscula, só que ignora certas palavras como o De, ficando ao invés de Sebastião Da Silva Barbosa, Sebastião da Silva Barbosa, veja a função: CONVERTER PRIMEIRA LETRA EM MAIUSCULO COM EXCECOES

Qualquer dúvida poste...flw
Tópico encerrado , respostas não são mais permitidas
Voltar