Evenements, Procédures et Fonctions

 Le langage VBScript pemet, comme dans les langages objet, d'associer à chaque controles des Evenements, qui se déclanchent automatiquement dès qu'une action est effectuée. Par exemple, l'objet Input (Pour les boutons, boites à cocher....), voici une liste de quelques evènements que nous utilserons :
Onclick Se déclanche quand on clique sur l'objet Ondblclick Se déclanche lorsque l'on double-cliques sur l'objet
Onmousemove Quand la souris passe sur l'objet Onkeypress Quand on entre quelquechose au clavier
Onchange Quand le contenu est modifié (ne fonctionne que sur les TextAera)...

Pour exécuter une action lors d'un évènement, il suffit d'ajouter à la balise INPUT les évènements où l'on veut agir (Avec NVU, on peut aussi aller dans l'onglet Avancé / Evenements JavaScript, lors de l'insertion de l'objet.

Un exemple qui suit sera certainement plus parlant
Code HTML / VBScript Rendu
<input  value="Modifiez mon contenu"
 onmousemove="VBScript:Alert 'Même pas en rêve'"
 onkeypress="VBScript:Alert 'Pas touche !'" name="Texte">

<input
 ondblclick="Alert 'Aie, doucement'"
 onclick="document.all.texte.value='Cherche, c''est facile'"
 name="Btn" value="Durée de la guerre de 100ans?"
 type="submit">


Remarque pour écrire c'est facile, on a mis deux apostrophes, car le contenu d'un texte doit déjà se trouver en 2 apostrophes.

 Les Procédures sont des sous-programmes qui permettent d'effectuer une tache précise. La déclaration de la procédure se fait dans la partie <HEAD> du fichier HTML, commence par Sub Nom_de_ma_procedure et se termine par End Sub. On peut dans une procédure donner des paramètres que l'on met alors entre parenthèse lors de la déclaration, comme le montre l'exemple ci dessous de calcul de PGCD avec la méthode d'Euclide.
Procedure PGCD Méthode d'appel Rendu
Sub PGCD(x,y)
  a=x
  b=y
  While b<>0
    r=a mod b
    a=b
    b=r
   Wend
  Alert "PGCD("&x&","&y&")="&a
End Sub		 <input size="2" name="valX" value="12"><br>

<input size="2" name="valY" value="16"><br>

<input onclick="PGCD document.all.valX.value,document.all.valY.value"
 name="BtPGCD" value="PGCD" type="submit">



et

Remarque : Les paramètres de la procédure PGCD sont déclarés entre parenthèses alors que l'appel de la procédure PGCD se fait sans. (Ne me demandez pas la raison!)

 Les procédure effectuent une tache, mais dans l'exemple précédent, il est impossble de récupérer le PGCD calculé, pour l'utiliser ensuite. Si on veut le faire, nous utiliserons des fonctions. Elles se programment exactement comme les procedures, il suffit de commencer la déclaration par Function Nom_de_la_fonction et de la terminer par End Function. Pour indiquer la valeur a retourner, il suffit de mettre Nom_de_la_fonction=La_valeur. Par exemple la fonction cube pourrait s'ecrire comme cela :
Function cube(nombre)
   cube = nombre*nombre*nombre
End Function

La valeur de retour d'un foncion, peut être un nombre, une chaine de caractère, une relation booléenne (vrai / faux).
<MENU>