DESCRIPTION.

L'instruction CLEAR  est utilisée pour réinitialiser les variables, fermer les fichiers ouvert et réactualiser la pile à l'origine.

SYNTAXES.

CLEAR 

REMARQUES.

valeur doit être 0 ou 1, pour indiquer quelle valeur aura l'index du premier item d'un tableau de données.

L'instruction CLEAR : 

- réinitialise les variables et  les items des tableaux de type numérique à 0 (zéro) ;

- réinitialise les variables et  les items des tableaux de type STRING à "" (chaine vide) ;

- ne modifie pas les valeurs des variables définieavec l'instruction CONT ;

- efface la portabilité des variables définies avec l'instruction COMMON ;

- ne modifie pas le partage des variables définies avec l'instruction SHARED ;

- détruit les tableaux de données redimensionnables créés avec avec $DYNAMIC ou REDIM ;

- ferme tous les fichiers texte encore ouverts ;

- vide et libère les tampons de fichiers ;

- réinitialise la pile et éventuellement, change sa taille (obsolète dans QB64).

Les tableaux de données déclarés après la métacommande $DYNAMIC ou avec l'instruction REDIM devront être déclarés de nouveau avec leur bonne dimension.

L'effacement de la pile efface les adresses de retour des instructions GOSUB, de ce fait, l'utilisation une instruction RETURN et provoquera une erreur.

L'instruction CLEAR ne doit pas être présente dans les fonctions personnalisées FUNCTION ou SUB.

EXEMPLES.

DIM LST_Fixe(60) AS INTEGER

REDIM LST_Modifiable(60) AS INTEGER

LST_Fixe(15) = 321

LST_Modifiable(5) = 876

kpartage = 123

kmessage$ = "bonjour les monde !"

GOSUB LAB_Afficher

CLEAR

PRINT

GOSUB LAB_Afficher

END

LAB_Afficher:

PRINT kmessage$

PRINT LST_Fixe(15) , UBOUND (LST_Fixe)

PRINT LST_Modifiable(5) , UBOUND (LST_Modifiable)

RETURN

retourne :

Bonjour le monde !

321           60

876           60

============

0           60

876           60

ERROR : out of range