Initiation à la programmation/Visual Basic

Début de la boite de navigation du chapitre

fin de la boite de navigation du chapitre

Programmer

Écrire dans un langage de programmation informatique une suite d'instructions, organisée en algorithme dans un but précis, exécutable par un ordinateur.

Notion de variable

Elles sont nécessaires pour stocker (conserver) une valeur dynamique et réutilisable.

C'est en fait une simple zone mémoire qui porte un nom choisi par le programmeur pour faciliter sa programmation. Le nom de la variable est une adresse mémoire.

Si l'on veut une programmation cohérente, il faut les déclarer avec leur type.

Menu Outils - Options - onglet Environnement - choisir « Requiert la déclaration des variables »

On peut aussi écrire la directive Option Explicit au début de la section des déclarations d'un module.

Syntaxe :

Dim <NomVariable> As <Type>

Pour la lisibilité du code, on peut les commenter après une apostrophe '

Exemples :

Dim Taux As Single ' Taux de la TVA
Dim Réponse As String ' Mot proposé par le joueur

Pour éviter tout problème, il est préférable d'initialiser les variables déclarées.

Compteur = 0
Taux = 20,6

Le langage Basic utilise 7 types de données dont les plus utilisés sont le type String (chaine de caractères), le type Integer (entier relatif) et le type Single (décimal).

Structure de contrôle

Structure conditionnelle

Les instructions à exécuter peuvent dépendre d'une condition. Il faut alors utiliser une structure décisionnelle qui oriente le déroulement du programme vers des blocs d'instructions déterminés. C'est la structure If … Then … Else … End If

Sur une seule ligne

If Condition Then Instruction1 Else Instruction2

Condition est une expression dont la valeur booléenne (True ou False).

Si cette expression est une valeur numérique, la valeur 0 (zéro) correspond à False et toute autre valeur correspond à True.

Exemple :

If Moyenne >= 10 Then Décision = "Admis" Else Décision = "Réfusé"

Sous forme de bloc

If Moyenne >= 10 Then 
    Admis = Admis + 1
    MsgBox("Candidat admis") 
Else 
    Ajournés = Ajournés + 1
    MsgBox("Candidat ajourné") 
End If

Cette structure n'est vraiment valable que pour une alternative (2 possibilités). Pour traiter les 3 possibilités, il faudra imbriquer un autre If après l'instruction Else.

If NombreProposé > NombreATrouver Then 
    MsgBox("Votre nombre est trop grand !") 
Else 
    If NombreProposé < NombreATrouver Then
        MsgBox("Votre nombre est trop petit !") 
    Else
        MsgBox("Gagné !") 
    End If
End If

Au-delà de 3 possibilités, on a besoin d'une autre structure qui peut gérer plusieurs cas.

C'est une extension du If … Then … Else …. Elle permet une programmation plus claire en évitant une trop grande imbrication de If successifs.

Syntaxe :

Select Case Expression
Case ListeValeurs1
[Instructions]
Case ListeValeurs2
[Instructions]
Case Else
[Instructions]
End Select

ListeValeurs peut être :

• une suite de valeurs : 1 ; 3 ; 5 ; 7 ; 9
• une fourchette : 0 To 9

Une seule expression (ou une simple variable) est testée au début puis est comparée avec les listes de valeurs. À la première concordance, les instructions correspondantes sont exécutées puis le programme sort de la structure. Si aucune concordance n'est trouvée, les instructions placées après le Else sont exécutées.

Boucle

Boucle tant que

Syntaxe première version :

Do While Condition
[Instructions]
… Exit Do
[Instructions]

ou

While Condition
[Instructions]
Wend

La condition est ici testée au début c'est-à-dire à l'entrée de la boucle. Avec While (tant que), la boucle est répétée tant que la condition est vraie. Si la condition n'est pas vraie au départ, les instructions de la boucle ne sont pas exécutées.

Exemple :

Do While MotProposé <> MotDePasse
    MotProposé = InputBox("Donnez votre mot de passe")
Loop