GRAPHER
cs_yoman64
Messages postés
592
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
4 décembre 2008
-
20 janv. 2006 à 07:42
amezghal Messages postés 385 Date d'inscription lundi 27 février 2006 Statut Membre Dernière intervention 21 août 2015 - 6 mars 2006 à 21:41
amezghal Messages postés 385 Date d'inscription lundi 27 février 2006 Statut Membre Dernière intervention 21 août 2015 - 6 mars 2006 à 21:41
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/35663-grapher
https://codes-sources.commentcamarche.net/source/35663-grapher
6 mars 2006 à 21:41
private sub Form_load()
picture1.scale (-20,20)-(20,-20)
end sub
private sub command1_click()
dim x,y as double
for x=-20 to 20 step 0.01
y=5*x*x
picture1.pset (x,y)
next
end sub
est avec msScript vous pouvez n'importe quelle fonction
comme ça au lieu de y=5*x*x (fonction définit )
en met s.Eval(text1.text,x)
s est le nom du control
contacter amezabdel2005@hotmail.com
25 févr. 2006 à 14:47
22 janv. 2006 à 22:37
(Utiliser OPTION EXPLICIT, pour être tranquille...)
Us.
22 janv. 2006 à 22:33
Juste une remarque pour l'optimisation. IL me semble que la structure la plus rapide ici c'est avec ELSEIF, soit :
IF (condition) THEN
(instructions)
ELSEIF (condition) THEN
(instructions)
ELSEIF ...
ENDIF
mais ceci dit, la structure la plus propre serait comme le dit Yacolever avec SELECT CASE...
BON, bref, sinon pour le reste je souscris aux remarques de Renfield et Yoman...
Amicalement,
Us.
22 janv. 2006 à 08:08
utilsé "case of" au lieux des if pour une meilleur optimisation
20 janv. 2006 à 09:49
Un Zip est requis.
20 janv. 2006 à 07:42