Yoann Herbet et Mathieu Tournadre
Ce formulaire permet de modifier et supprimer la note d'un participant. Il a été construit selon la charte graphique qui a été décidé pour l'intégralité des missions.
Nous avons fait en sorte que lorsque l'on sélectionne une donnée dans un champ cela affecte les données suivantes de manière a ce que l'on ai une cohérence dans les données.Comme par exemple ci-dessous:
Lorsque que l'on a sélectionné la date cela nous a mis le nom des entraineurs et des compétiteurs qui ont participé ce jour là.
Voici un exemple de message d'erreur que nous avons utilisé:
'gestion d'erreur If IsNull(lst_nom_entraineur) Then MsgBox (" Choisir un entraineur ") lst_nom_entraineur.SetFocus Exit Sub End If
Grâce au message:
Ce message d'erreur apparait lorsque l'on essaye de modifié la note d'un compétiteur sans avoir choisit son entraineur,de même que les autres messages d'erreurs si leurs conditions ne sont pas remplit. Si toutes les conditions sont remplient et que la modification un message apparait,pour cela on a utilisé le code suivant:
MsgBox ("Note modifiée avec succès")
Voici le message:
des messages d'erreur ont aussi été utilisé pour prévenir l'utilisateur avant de continuer.Ce sont les même messages que précédemment:
'gestion d'erreur If IsNull(lst_nom_entraineur) Then MsgBox (" Choisir un entraineur ") lst_nom_entraineur.SetFocus Exit Sub End If
Voici le message:
Ce message apparait lorsque l'on essaye de supprimer une note sans que toutes les conditions soient remplit. Lorsque toutes les conditions requises sont remplit un message grâce au code suivant:
MsgBox ("Enregistrement supprimé")
Le message:
DoCmd.Close
Ce formulaire permet de saisir une note pour un compétiteur. Comme précédemment nous avons utilisé la gestion d'erreur pour avertir l'utilisateur grâce a des codes comme ci-dessous:
If IsNull(lst_date_competition) Then MsgBox (" Choisir une date ") lst_date_competition.SetFocus Exit Sub End If
Cela nous permet de savoir si une personne a déjà une note grâce a un message. Quand l'on rentre une note a une personne n'en ayant pas nous avons un message comme quoi la note a été ajouté avec succès. Quand l'on a finit un bouton fermé no permet de fermer le formulaire grâce au code suivant:
DoCmd.Close
Nous avons créer un état permettant de voir pour un candidat donné un récapitulatif de sa saison avec la liste des compétitions auxquelles à participé le compétiteur en indiquant pour chacune sa date,le lieu et la note obtenu.
Base de données (avec formulaire et état) → cliquer ici