DONNER LE NOMBRE DE CARACTÈRES DE L'ALPHABET CONTENU DANS UN TEXTE
CGSI3
Messages postés
416
Date d'inscription
vendredi 22 février 2008
Statut
Membre
Dernière intervention
7 janvier 2018
-
11 sept. 2012 à 21:55
cs_alpha5 Messages postés 74 Date d'inscription jeudi 10 août 2006 Statut Membre Dernière intervention 24 mars 2013 - 16 sept. 2012 à 19:47
cs_alpha5 Messages postés 74 Date d'inscription jeudi 10 août 2006 Statut Membre Dernière intervention 24 mars 2013 - 16 sept. 2012 à 19:47
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/54592-donner-le-nombre-de-caracteres-de-l-alphabet-contenu-dans-un-texte
https://codes-sources.commentcamarche.net/source/54592-donner-le-nombre-de-caracteres-de-l-alphabet-contenu-dans-un-texte
16 sept. 2012 à 19:47
Merci de ton aide
11 sept. 2012 à 22:43
Public Function StrWithoutAccent(ByRef chaine As String) As String
Dim objBytes() As Byte = System.Text.Encoding.GetEncoding(1251).GetBytes(chaine)
Return System.Text.Encoding.ASCII.GetString(objBytes)
End Function
11 sept. 2012 à 21:55
Voici également une autre méthode par l'utilisation de Linq
elle renvoi sensiblement la meme chose a partir de la propriétée .Text d'un TextBox
dans la variable requete puis sur la console
Dim LettersGroup() As Char
LettersGroup = TextBox1.Text.ToUpper.ToCharArray Dim requete From Lettre In LettersGroup Group By Lettre Into Som Group Select Lettre, Som.Count
For Each Elt In requete
Console.WriteLine(Elt.Lettre & " " & Elt.Count)
Next
Cordialement CGSI3