Programmation en visual basic
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)