Programmation en visual basic
stefyledur
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour, c'stefy s'il vous plait je voudrais avoir le code d' un programme en visual basic qui permet de compter le nombre de voyelles dans une phrase
Configuration: Windows XP Internet Explorer 6.0
1 réponse
-
Salut, c'est facile avec l'instruction select :
Dim Phrase As String Dim Voyelles As Integer Dim I As Integer Phrase = "Salut, comment tu vas?" Phrase = LCase(Phrase) ' Mieux si on fait tout en minuscule For I = 1 To Phrase.Length() Select Case Mid(Phrase, I, 1) Case "a" Voyelles = Voyelles + 1 Case "e" Voyelles = Voyelles + 1 Case "i" Voyelles = Voyelles + 1 Case "o" Voyelles = Voyelles + 1 Case "u" Voyelles = Voyelles + 1 Case "y" Voyelles = Voyelles + 1 End Select Next MsgBox(Voyelles)