Programmation VbScript: Tableaux

Fermé
ophedos Messages postés 73 Date d'inscription dimanche 4 mai 2008 Statut Membre Dernière intervention 30 mai 2016 - Modifié par jordane45 le 25/11/2014 à 18:03
jordane45 Messages postés 38453 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 16 mars 2025 - 25 nov. 2014 à 18:17
Bonjour,

J'ai commencé il y a quelques jours la programmation en cours, on a commencé donc à programmer des petites choses simples en VbScript. Et notre professeur nous a donné un exercice à faire qui est le suivant:

"Ecrire un programme en Vb Script qui permet de gérer les notes de N étudiants
Le programme doit permettre de :
- lire le nom de tous les élèves
- lire la note d'informatique de chaque étudiant
- Afficher le nom de celui qui a la meilleure note
- Afficher le nom de celui qui a la plus mauvaise note
- Afficher la moyenne du groupe
- Afficher la liste des noms par ordre alphabétique
- Afficher la liste des noms et des notes par ordre alphabétique"

Pour le moment j'ai réussi à faire les deux premières consignes mais je suis bloquée sur le reste...
Ah oui, il faut que ça soit fait sous-forme de tableau!
Voilà ce que ça donne pour le moment:

N= InputBox("Entrez le nombre d'étudiant")
N=CInt(N)
Dim noms()
ReDim noms (N)
For i=0 to N-1
noms(i)=InputBox ("Entrez le nom de l'étudiant")
Next
For i=0 to N-1
msgbox noms(i)
Next
Dim notes()
ReDim notes (N)
For i=0 to N-1
notes(i)=InputBox ("Entrez la note de " & noms(i))
Next
For i=0 to N-1
msgbox notes(i)
Next



1 réponse

jordane45 Messages postés 38453 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 16 mars 2025 4 740
25 nov. 2014 à 18:17
Bonjour,

Note min et note max
http://www.visualbasicscript.com/Minimum-and-Maximum-values-in-an-array-in-VB-script-m88232.aspx

Tri alphabétique :
https://dzone.com/articles/vbscript-array-sort

.. par contre, tu créés un tableau ( un ARRAY ) pour chaque chose .. NOMS .. NOTES ...
Ne serait -il pas mieux de faire un tableau à 2 Dimensions ?
http://www.w3schools.com/vbscript/vbscript_variables.asp

nb= InputBox("Entrez le nombre d'étudiant")
N=CInt(nb)
dim eleve()

redim eleve(N,2)

' REMPLISSAGE DU TABLEAU
for i=0 to N-1
 nom  = InputBox ("Entrez le nom de l'étudiant" & i)
 note = InputBox ("Entrez la note de " & nom )
 eleve(i,0) = nom
 eleve(i,1) = note
next


' LECTURE DU TABLEAU
for j = 0 to ubound(eleve)-1
 msgbox "Nom: " & eleve(j,0) &  " - Note:" & eleve(j,1)
next


0