Lancer une procedure à partir d une chaine de caractere
farrakis
Messages postés32Date d'inscriptionvendredi 28 janvier 2005StatutMembreDernière intervention12 mai 2013
-
10 mars 2006 à 18:06
asecher
Messages postés262Date d'inscriptionlundi 20 octobre 2003StatutMembreDernière intervention27 avril 2007
-
11 mars 2006 à 21:46
Bonjour,
J aimerais lancer une procédure partir d'une chaine de caractere, sans avoir à écrire du code du genre
If monTexte="toto" then call toto
mais plutot qqch du genre call monTexte..
Existe t il un moyen de faire ça
Je travaille en VB6
Merci de votre aide
A voir également:
Lancer une procedure à partir d une chaine de caractere
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 11 mars 2006 à 02:30
salut,
proprement, ce n'est pas faisable.
tu peux par contre avoir une autre procédure avec la txtbox.text en
paramètre, qui appellera la procédure adéquate (ce qui n'empêchera pas
d'avoir 100 lignes...)
asecher
Messages postés262Date d'inscriptionlundi 20 octobre 2003StatutMembreDernière intervention27 avril 20071 11 mars 2006 à 21:46
En VBS, on peut faire comme ça :
'***on choisit de lancer Titi ou Toto
sousprog=inputbox("Titi ou Toto")
'***on crée la sub qui va appeler la sub choisie
Execute "Sub callsub:" & sousprog & ":end sub"
'***on appelle la sub qui va appeler la sub choisie
callsub
'***fin du script
wscript.quit
'***subs exemple
sub Titi()
msgbox "Titi est lancé"
end sub
sub Toto()
msgbox "Toto estlancé"
end sub