Kholera
Messages postés27Date d'inscriptionmercredi 11 octobre 2000StatutMembreDernière intervention10 octobre 2002 28 févr. 2002 à 17:58
Dans la série j'ai réinventé la roue, t'es dans les premiers nominés Vivaskull...
Ou t'as rien d'autre à faire de tes journées ou tu connaissais pas la fonction "InStr" !
Si c'est la deuxième option, alors reprends ta form et mets juste :
k = InStr(1, Text1.Text, Text2.Text)
MsgBox ("le texte recherché se trouve à l'indice " + CStr(k))
dans ton Command1_Click(), et vire le reste qui est inutile. tu auras énonomisé une trentaine de ligne... No comment !
En passant je te rappelle que le but d'une source est d'aider les autres, mais avec ce genre de ?$@*&/!, t'aide personne, d'autant que c'est déjà présent sur le site...
28 févr. 2002 à 17:58
Ou t'as rien d'autre à faire de tes journées ou tu connaissais pas la fonction "InStr" !
Si c'est la deuxième option, alors reprends ta form et mets juste :
k = InStr(1, Text1.Text, Text2.Text)
MsgBox ("le texte recherché se trouve à l'indice " + CStr(k))
dans ton Command1_Click(), et vire le reste qui est inutile. tu auras énonomisé une trentaine de ligne... No comment !
En passant je te rappelle que le but d'une source est d'aider les autres, mais avec ce genre de ?$@*&/!, t'aide personne, d'autant que c'est déjà présent sur le site...