Complementation de zeros a gauche (2)
Soyez le premier à donner votre avis sur cette source.
Snippet vu 5 865 fois - Téléchargée 68 fois
Contenu du snippet
Ce code permet de formater une chaîne numérique en la complémentant de zéros à gauche.
Exemple:
n1="12007" , nc=12 , cr="0"
===> concatg = "000000012007"
avec:
n1 = chaîne numérique en entrée
n2 = chaîne numérique en sortie
nc = nombre de caractères en sortie
cr = caractère de complémentation
Exemple:
n1="12007" , nc=12 , cr="0"
===> concatg = "000000012007"
avec:
n1 = chaîne numérique en entrée
n2 = chaîne numérique en sortie
nc = nombre de caractères en sortie
cr = caractère de complémentation
Source / Exemple :
Function concatg(n1, nc ,cr) concatg=mid(string$(nc,cr) & n1,len(n1)+1,nc) End Function
A voir également
- Complementation de zeros a gauche (2)
- Zéros à gauche ✓ - Forum - Visual Basic
- Visual Basic / VB.NET : Formater un paragraphe entre deux marges (droite et gauche). - CodeS SourceS - Guide
- Sql decimal 2 chiffres après virgule - Forum - SQL
- Comparer deux string java ✓ - Forum - Delphi / Pascal
- Comparaison des chaînes de caractères ✓ - Forum - Java
Commentaires
J´ai un problème où je voudrais faire le contraire;éliminer des zé´ros á gauche.
Le calcul donne 00123 et je veux afficher 123.
Si vous pouvez m´aider et m´expliquer, merci d´avance..
Marc
Jamais entendue parlé de la fonction String ?
(Beaucoup plus simple)
concatg=String(nc,cr) & cstr(n1)
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.