MISE EN FORME DE PARAGRAPHE (JUSTIFIE) EN POLICE A LARGEUR FIXE

Signaler
Messages postés
2167
Date d'inscription
mardi 11 novembre 2003
Statut
Membre
Dernière intervention
16 juillet 2009
-
Messages postés
91
Date d'inscription
jeudi 18 novembre 2004
Statut
Membre
Dernière intervention
17 décembre 2008
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/38468-mise-en-forme-de-paragraphe-justifie-en-police-a-largeur-fixe

Messages postés
91
Date d'inscription
jeudi 18 novembre 2004
Statut
Membre
Dernière intervention
17 décembre 2008

je poste la version 2.0
Messages postés
91
Date d'inscription
jeudi 18 novembre 2004
Statut
Membre
Dernière intervention
17 décembre 2008

ah ben j'avais pas vu la reponse, desole, j'ai pas une connexion d'enfer a Istanbul.
Messages postés
91
Date d'inscription
jeudi 18 novembre 2004
Statut
Membre
Dernière intervention
17 décembre 2008

Salut MadM@tt,

Option Base 1
C'est une erreur de ma part, d'habitude je met Option Base 0 qui ne sert a rien puisque c'est la valeur par defaut.
Pourquoi ?
La fonction Split() renvoi TOUJOURS un tableau qui commence a 0.
La fonction Array() renvoi un tableau qui comment a Option Base.
De plus la fontion Split renvoi un tableau vide si la chaine a decoupe est vide ("").
Donc pour ne pas avoir d'erreur lorsque je ne sais pas si la chaine est vide (par exemple un ligne vide qu'on essaierait de decouper en mots), j'effectue les actions suivantes
If Text = "" Then
Tableau = Array("")
Else
Tableau = Split(Text)
End If
En l'occurence, j'ai oublie d'ecrire ca dans ce code.

Option Compare Text
L'option par defaut est Option Compare Binary, en precisant Option Compare Text, on evite de reecrire ce choix dans les fonctions suivantes : Split(), InStr(), Replace(), etc...
En simple, Option Compare Binary est sensible a la casse, pas Option Compare Text.
Ce module n'utilise que Split() et a ma connaissance, l'espace et le retour a la ligne sont de toute facon non sensibles a la casse ;o)
Messages postés
2167
Date d'inscription
mardi 11 novembre 2003
Statut
Membre
Dernière intervention
16 juillet 2009
1
Merci pour les infos ;)
Afficher les 13 commentaires