Como contar caracteres maiusculos em uma frase?
[quote:912122600b=´Moderação´][color=red:912122600b]Título editado por Massuda
Por favor, não use apenas letras maiúsculas no título/texto.
Leia as :arrow: [url=http://forum.clubedelphi.net/viewtopic.php?t=6689]Regras de Conduta[/url] do fórum.[/color:912122600b][/quote:912122600b]
e ae galera.. blz??
to precisando muito contar caracteres de uma uma frase digitada pelo usuário, porém não consigo achar nenhum função que faça, será que alguém sabe ou pelo menos me de as coordenadas de como fazer??
abraços!!!
Por favor, não use apenas letras maiúsculas no título/texto.
Leia as :arrow: [url=http://forum.clubedelphi.net/viewtopic.php?t=6689]Regras de Conduta[/url] do fórum.[/color:912122600b][/quote:912122600b]
e ae galera.. blz??
to precisando muito contar caracteres de uma uma frase digitada pelo usuário, porém não consigo achar nenhum função que faça, será que alguém sabe ou pelo menos me de as coordenadas de como fazer??
abraços!!!
Jimisl
Curtidas 0
Respostas
Carlosrodrigop
26/03/2007
claro que existe um metodo para a classe char.
Um objeto do tipo String, em sua origem mais primaria é um array de char basta fazer um looping conforme abaixo usando os metodos da classe char para testar se o char é letra e se caso for se a letra é maiuscula ou minuscula
Um objeto do tipo String, em sua origem mais primaria é um array de char basta fazer um looping conforme abaixo usando os metodos da classe char para testar se o char é letra e se caso for se a letra é maiuscula ou minuscula
Dim contador As Integer = 0 For Each c As Char In Me.PASSWORD If Char.IsLetter(c) Then If Char.IsUpper(c) Then contador += 1 End If End If Next
GOSTEI 0
Jimisl
26/03/2007
vou testar esse fonte amigão......
volto aki pra te falar......
brigadãooooooooooooooooooo
(deixa eu te falar.. tenho outros 3 programinha basicos que meu professor passou..... vc podeira me ajuda a fazer????
vlwwwwwwwww
volto aki pra te falar......
brigadãooooooooooooooooooo
(deixa eu te falar.. tenho outros 3 programinha basicos que meu professor passou..... vc podeira me ajuda a fazer????
vlwwwwwwwww
GOSTEI 0
Carlosrodrigop
26/03/2007
que mal tem
GOSTEI 0
Jimisl
26/03/2007
fera... qual seu e-mail.... pra mim te passar os exercicios....???
abraço!!
abraço!!
GOSTEI 0
Jimisl
26/03/2007
migão....
nessa linha do fonte:
For Each c As Char In Me.PASSWORD
o VB não está achando o comando Me, tenho que habilitar alguma coisa no programa???
vlww..
nessa linha do fonte:
For Each c As Char In Me.PASSWORD
o VB não está achando o comando Me, tenho que habilitar alguma coisa no programa???
vlww..
GOSTEI 0
Jimisl
26/03/2007
migão. consegui fazer..ficou assim:
Module Module1
Sub Main()
Dim password As String
Dim contador As Integer = 0
Console.WriteLine(´Digite uma frase´)
password = Console.ReadLine
For Each c As Char In password
If Char.IsLetter(c) Then
If Char.IsUpper(c) Then
contador += 1
End If
End If
Next
Console.WriteLine(contador)
Console.ReadKey()
End Sub
End Module
qual seu email para te mostrar o resto?
Module Module1
Sub Main()
Dim password As String
Dim contador As Integer = 0
Console.WriteLine(´Digite uma frase´)
password = Console.ReadLine
For Each c As Char In password
If Char.IsLetter(c) Then
If Char.IsUpper(c) Then
contador += 1
End If
End If
Next
Console.WriteLine(contador)
Console.ReadKey()
End Sub
End Module
qual seu email para te mostrar o resto?
GOSTEI 0
Carlosrodrigop
26/03/2007
carlosrodrigop@gmail.com
GOSTEI 0
Jimisl
26/03/2007
foi enviado fera... abraço!!!
GOSTEI 0