Langage de programmation - QuickBASIC/QBasic - Référence de procédures et de fonctions

DECLARE	Déclare
QuickBASIC/QBasic

Syntaxe

DECLARE {FUNCTION | SUB} nom [([listeParam])]

Paramètres

Nom	Description
nom	Ce paramètre permet d'indiquer le nom que doit avoir la procédure.
listeParam	Ce paramètre permet d'indiquer la liste des paramètres optionnels que doit avoir la procédure. Les paramètres ont la syntaxe suivantes : variable[( )] [AS type] [, variable[( )] [AS type]]...

Description

Cette commande permet d'effectuer la déclaration d'une procédure ou d'une fonction et de vérifier la validité de ses paramètres.

Remarques

Pour les appels au sein de BASIC, l'instruction DECLARE n'est requise que si vous appelez des procédures SUB sans le mot clef CALL, ou si vous appelez une FUNCTION définie dans un autre module.
Une instruction DECLARE oblige également le compilateur à vérifier le nombre et le type de paramètres utilisés pour appeler la procédure. Le QuickBASIC génère automatiquement des instructions DECLARE lorsque vous enregistrez votre programme tout en travaillant dans l'environnement. L'instruction DECLARE ne peut apparaître que dans le code au niveau du module (pas dans un SUB ou FUNCTION) et affecte l'ensemble du module.
Les types de la liste des paramètres sont INTEGER, LONG, SINGLE, DOUBLE, STRING ou un type défini par l'utilisateur. Encore une fois, seuls le nombre et les types de paramètres sont significatifs.
Vous ne pouvez pas avoir de chaînes de caractères de longueur fixe dans les instructions DECLARE car seules les chaînes de caractères de longueur variable peuvent être passées aux procédures SUB et FUNCTION. Les chaînes de caractères de longueur fixe peuvent apparaître dans une liste de paramètres mais sont converties en chaînes de caractères de longueur variable avant d'être transmises.
Le type d'une variable peut également être indiqué en incluant un caractère de type explicite (%, &,!, # Ou $) ou en s'appuyant sur le type par défaut.
Dans les années 1980, le QBasic et le QuickBASIC se voyait comme un concurrent du Turbo Pascal et de nombreuses caractéristiques de se concurrent se retrouvèrent inséré dans la structure du code de QuickBASIC. Ainsi, la commande «DECLARE» se veut un genre d'équivalence du FORWARD intégré dans le Turbo Pascal.

Exemples

Voici un exemple permettant d'afficher le logarithme inférieurs à 2 en utilisant le mot réservé «FUNCTION» :


				
DECLARE FUNCTION Ln! (X AS DOUBLE)

DECLARE SUB SubA ()

         

DIM I AS DOUBLE

I = .1

WHILE I <= 2!

 PRINT "LOG(";

 PRINT USING "#.#"; I;

 PRINT ")="; Ln(I)

 I = I + .1

WEND

CALL SubA

 
FUNCTION Ln (X AS DOUBLE)

 Ln = LOG(X)

END FUNCTION

 
SUB SubA

 PRINT "SUB-A"

END SUB

on obtiendra le résultat suivant :

LOG(0.100000)=-2.302585 LOG(0.200000)=-1.609438 LOG(0.300000)=-1.203973 LOG(0.400000)=-0.916291 LOG(0.500000)=-0.693147 LOG(0.600000)=-0.510826 LOG(0.700000)=-0.356675 LOG(0.800000)=-0.223143 LOG(0.900000)=-0.105360 LOG(1.000000)=0.000000 LOG(1.100000)=0.095310 LOG(1.200000)=0.182322 LOG(1.300000)=0.262364 LOG(1.400000)=0.336472 LOG(1.500000)=0.405465 LOG(1.600000)=0.470004 LOG(1.700000)=0.530628 LOG(1.800000)=0.587787 LOG(1.900000)=0.641854 SUB-A

Voici un exemple d'un mélange volontaire de l'ordre des définitions des procédures et fonctions obligeant à les prédéclarer :



DECLARE SUB C()

DECLARE SUB A()

DECLARE FUNCTION B()

 
SUB C

 CALL A

 IF B THEN PRINT "C"

END SUB

 
FUNCTION B()

 PRINT "B"

 B = 1

END FUNCTION

         

SUB A

 PRINT "A"

END SUB

 
CALL C

on obtiendra le résultat suivant :

A B C

Voir également

Langage de programmation - QuickBASIC/QBasic - Référence de procédures et de fonctions - CALL
Langage de programmation - QuickBASIC/QBasic - Référence de procédures et de fonctions - FUNCTION
Langage de programmation - QuickBASIC/QBasic - Référence de procédures et de fonctions - SUB

Dernière mise à jour : Mercredi, le 14 septembre 2016

Section courante

A propos

Section administrative du site

DECLARE