Aidez moi pour projet vb6
Résolu
abdouzaa
Messages postés
19
Statut
Membre
-
abdouzaa Messages postés 19 Statut Membre -
abdouzaa Messages postés 19 Statut Membre -
Bonjour ,
j'espère que vous allez bien , svp je suis bloqué dans un projet de vb6 depuis 3 mois j'ai mal cherché dans les forums mais aucun résultats , dans ce projet de simuler les résultats obtenus par 10 chansons lors d’un concours qui a lieu devant 5 membres du Jury. Il faudra saisir les notes attribuées par chaque membre du jury pour chaque chanson puis on détermine la chanson gagnante .Le clic sur le bouton « Résultats par ordre de mérite » permet d’afficher les résultats par ordre de mérite en indiquant respectivement le classement, le n° de chanson et le total des points qu’elle a obtenu lorsque tous les membres du jury ont voté.
Le clic sur le bouton « La chanson gagnante est » permet d’afficher dans List1 le numéro de la chanson gagnante
Svp qui peut m'aider pour le code de ces 2 commandes .
j'espère que vous allez bien , svp je suis bloqué dans un projet de vb6 depuis 3 mois j'ai mal cherché dans les forums mais aucun résultats , dans ce projet de simuler les résultats obtenus par 10 chansons lors d’un concours qui a lieu devant 5 membres du Jury. Il faudra saisir les notes attribuées par chaque membre du jury pour chaque chanson puis on détermine la chanson gagnante .Le clic sur le bouton « Résultats par ordre de mérite » permet d’afficher les résultats par ordre de mérite en indiquant respectivement le classement, le n° de chanson et le total des points qu’elle a obtenu lorsque tous les membres du jury ont voté.
Le clic sur le bouton « La chanson gagnante est » permet d’afficher dans List1 le numéro de la chanson gagnante
Svp qui peut m'aider pour le code de ces 2 commandes .
14 réponses
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention Ambassadeur 1 588
bonjour, peux-tu partager ce que tu as réalisé pendant ces trois mois?
dans quel contexte fais-tu ce travail? -
Oui bien sur , c'est un projet de fin de semestre vous voulez les codes ? j'ai seulement fait les codes pour entrer les valeurs dans combobox , et faire des tests de checkbox si il est true la ligne des comobo pour le membre est Unlocked c'est un simple code maintenant je suis bloqué comment je peux calculer la somme des points qui est était affecter sur les chansons de 1 a 10 et l'afficher et indiquer celle qui a le plus des points pour etre gagnante.
-
Merci beaucoup ça fait trop plaisir votre aide voici le lien :https://www.cjoint.com/c/JFkrBEzIJVA
Oui j'ai fait une étape de l'affectation de chaque chanson du combobox par 5 point ou 3 point ou 1 point tout en utilisant la fonction Combo().DataField -
Oui pour le message dans le combobox je l'ai fait pour que les membres n'entrent pas 3 chansons les memes est intoduite dans les instructions du projet , il faut entrer 3 chansons différentes si non un message d'erreur va s'afficher
-
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
Pour le projet veux pas s'afficher? je reprend et je colle le lien une nouvelle fois?
-
Oui le probleme pour le total des points j'ai pas une idée comment je peux le faire j'ai cherché partout , je suis bloqué dans cette etape .
-
Re
je suis bloqué dans cette etape
Dans les comboboxs vous avez le numero de la chanson et a chaque combobox correspond une valeur (5, 3, 1)
Une facon de faire:
Definir une variable tableau TPChanson(11), 11 pour 0 a 10 et 1 a 10 sera utilise pour etre synchro avec le numero de chanson
click sur bouton Command1
Raz tableau TPChanson
boucles sur les comboboxs
cas de la premiere combobox
Combo1(0).datafied="5" -> valeur a entrer dans le tableau , choix chanson="7" -> rang dans le tableau
Donc: TPChanson(clng(Combo1(0))=TPChanson(clng(Combo1(0))+clng(Combo1(0).datafield)
apres
Tri croissant du tableau TPChanson pour avoir le classement des chansons moins de point vers plus de point
affichage dans les label 8 et 9 num chanson et points en commencant par la fin du tableau
-
-
Merci Beaucoup ça fait trop plaisir ,votre aide je vais le tester maintenant la méthode .
-
Je vais definir deux compteurs i et j pour razer le tableau n'est ce pas ?
-
-
Svp je sais pas comment faire la méthode : j'ai fait ce code mais je sais pas esque c'est comme ça on doit faire
Dim TPChanson(11) As Integer
For i = 0 To 2
For j = 1 To 11
TPChanson(j) = Combo1(i).DataField
TPChanson(j) = Combo1(j).Text
TPChanson(CLng(Combo1(i))) = TPChanson(CLng(Combo1(j).Text) + CLng(Combo1(i).DataField))
Next
Next-
Bonjour,
comment faire la méthode
Je vais vous faire le code car je vois que vous faites des efforts pour rechercher une solution
il semble que ce soit un exo de programmation, quelles etudes faites vous ?
Surprenant que ce soit du VB6.0!- Bonjour ,
Merci beaucoup ça fait énormement plaisir j'ai tellement cherché en faite pour ma part je suis dans une école d'ingénieur je suis pas de filiére informatique mais je fais de la modélisation et finance , et meme on a étudié du programmation comme java c++ c et maintenant ce semestre avec Vb 6 :) :) - Re,
Fichier modifie pour mise en tableau point par chanson, Tri croissant du tableau, affichage du resultat
https://mon-partage.fr/f/Lz1LruRR/
Reste l'affichage de la chanson gagnante. Facile
Amusez vous..
-
-
Bonjour ,
Merci beaucoup pour votre aide et patience ça fait plaisir svp quand j'ai lancé le projet il faut que j'ajoute le tableau dans commande 1 ? car j'ai trouvé le tableau ajouter dans une feuille de module -
Re,
svp je reçois ce message quand je veux ouvrir le projet ou tu m'as ecris le code désolé du dérangement que j'ai fais a vous .
-
Re ,
Je crois la cause de cette erreur car il ya pas le fichier project il ya seulement les modules un des fichiers est introuvable-
Re,
J'ai fais une erreur en supprimant la form que j'avais modifie, je dois tout refaire, pas grave..
Suite:
Ai retrouve la form
https://mon-partage.fr/f/Uyf6wlMB/
-
-
Merci beaucoup , je suis tellement désolé pour ce derangement que j'avais fais pour vous merci beaucoup pour votre aide .
