Astuce pour débutants ? gérer le pluriel dans les messages (eviter « vous allez supprimer 1 message(s) ») :)

Soyez le premier à donner votre avis sur cette source.

Vue 4 677 fois - Téléchargée 198 fois

Description

Tout est dit dans le titre de la source
Je voulais partager avec vous une technique que j'utilise toujours dans ces cas ...

Source / Exemple :


Option Explicit

Private Sub cmdGénerer_Click()
' Là j'ai pris un exemlpe, qui s'exécute
' avant une procédure de suppression.

' En utilisant la fonction iif, la procédure ajoute
' "message" avec ou sans "s" selon la valeur de la zone
' de texte ..

If Val(txtNbre) > 0 Then
    MsgBox "Vous aller supprimer " & txtNbre & IIf(Val(txtNbre) = 1, " message", " messages") & " !", vbInformation + vbOKCancel
End If
' Pour plus de détailles sur iif, consulter l'aide en ligne.
End Sub

Private Sub Command1_Click()
End
End Sub

Private Sub txtNbre_KeyPress(KeyAscii As Integer)
' Limiter les caractères saisies au chiffres seulement
If (KeyAscii < 49 Or KeyAscii > 57) And KeyAscii <> 8 And KeyAscii <> 13 Then
    KeyAscii = 0
End If
If KeyAscii = 13 Then cmdGénerer_Click
End Sub

' Golden-X

Conclusion :


J'ai bien dit que c'est pour les débutants ;-)

Bonne prog

A+

Golden-X

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
3006
Date d'inscription
dimanche 14 avril 2002
Statut
Membre
Dernière intervention
31 décembre 2008

pas grave tt ça
mais plutôt, à propos de la remarque que tu faisais que bcp de webmasters et programmeurs n'utilisaient pas cette possibilité pourtant enfantine, c'est probablement tt simplement pr des raisons de ressoures. ça fait tjs des calculs en moins, et s'il y en a bcp...
Messages postés
208
Date d'inscription
mercredi 10 avril 2002
Statut
Membre
Dernière intervention
11 juin 2014

Voilà, l'orthgaffe est corrigée ..
Bonne prgrammations les gars.

Golden-X
Messages postés
208
Date d'inscription
mercredi 10 avril 2002
Statut
Membre
Dernière intervention
11 juin 2014

Pour Kirua :
"EVITER « VOUS ALLER SUPPRIMER 1 MESSAGE(S) »" n'est pas une faute :) j'explique :
» Avant, pour ne pas se casser la tête avec le pluriel, je code comme suit :
MsgBox "Vous allez supprimer " & nbr & " message(s)"
quelque soit la valeur de nbr : >= 1 .. et c'est le cas de la plupart des programmeur et même les Webmasters .. regardes un peu sur vbfrance :
0 message(s) en attente
4 source(s)
62 message(s) dans le forum
0 news sur CodeS-SourceS
ce que je trouve moche ... alors j'ai écris ce programme pour eviter ça .. voilà
J'espère que c'est clair maintenant.
A + et bonne programmtion.
Messages postés
3006
Date d'inscription
dimanche 14 avril 2002
Statut
Membre
Dernière intervention
31 décembre 2008

" EVITER « VOUS ALLER SUPPRIMER 1 MESSAGE(S) ») "

là est la faute.

scuse moi, je ne savais pas que tu n'étais pas francophone. Quel est ta langue maternelle ?
Messages postés
962
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
2 août 2010
1
Ouais ben la c l'équivalent de

if msg>1 then msgbox "vous avez " & msg & "nouveaux messages" :else: msgbox "vous avez " & msg & "nouveau message"

if,c'est plus facile a comprendre que iif pour les newbies...
Afficher les 11 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.