Premier caractere a rechercher

Question

PetiteBille d'amooouur!

Petite bille possede 2 text box, l'un text1 et l'autre text2

Petite bille ecrit un mot dans text1, un mot qui commence par une voyelle ex : "avion ou oignon" et voudrait voir apparaitre dans text2 le mot precede par " l' " ex : " l'oignon ou l'avion". Si le mot ne commence pas pas une voyelle, alors le text1=text2.
Le tout est de savoir comment le programme arrivera a reperer le premiere caractere du mot de "text1".

Merci et peut-etre à bientot !

PatDeLaYaute · Answer

salut,
c'est tout simple : 

dans l'evenement keypress tu met ca : 
  
  dim PremCar$
  if text2.text="" then
    PremCar$=mid(text1.text,1,1)
    if PremCar$="a" or_ 
       PremCar$="e" or_
       PremCar$="i" or_
       PremCar$="o" or_
       PremCar$="u" or_
       PremCar$="x" then_ 
       text2.text="l'"
    end if
  end if

voilà @+

PetiteBille · Answer

PetiteBille

Merci a toi "Papatte". 
Ce petit code fonctionne a merveille.

Au moins toi, t'es pas comme moi, tu "Yauyaute" pas de la touffe.

Merci encore et peut-etre a bientot. 

PetiteBille content, content, content, cont.....

Premier caractere a rechercher

2 réponses

Discussions similaires