Étape 1: chaînes
TEXTA = « abcdefg »
mettre "les symboles des deux côtés du texte que vous voulez être compté en tant que chaîne
Mid (chaîne, début, longueur) sélectionne une section de texte dans une chaîne
dans les chaînes il n’y a aucun zéro début cordes début à 1
textb = mid (texta, 2, 2)
ce qui rend le textb variable = « bc »
textb = mid (texta, 4, 4)
ce qui rend le textb variable = « defg »
textb = mid (texta, 4, 5)
ce qui rend le textb variable = « defg »
C’est exact si le texte que vous essayez de sélectionner est plus long, puis le texte disponible, elle se termine au dernier caractère
selon votre programme, vous devrez placer des pièges pour éviter les erreurs.
Il s’agit d’un tel piège :
textb = mid (texta, 4, 5)
si len(textb) < 5 puis ' Len() retourne la longueur d’une chaîne le < signifie moins alors
MsgBox « le texte est trop court » ' affiche un message avec la chaîne
exit sub ' il quitte le sub vous êtes po se terminant le code. Si vous êtes dans une fonction, puis, vous mettriez exit function
fin si
trouver l’endroit d’un caractère dans une chaîne
Nous utilisons instr (Start, String1, String2)
TEXTA = « abcdefg »
textb = instr (1, texta, « c ») ' Ceci conclut la lettre c en chaîne texta
textb est maintenant égale à 3
REMARQUE :
Instr retourne 0 (zéro) si elle ne trouve pas le caractère
RÉORGANISATION :
Il s’agit d’un ennuyeux
Supposons que vous vouliez « abcdefg » être « defgabc »
TEXTA = « abcdefg »
textb = mid (texta, 4, 4) & mid (texta, 1, 3)
Ce n’était pas trop mal, mais maintenant passons ajouter dans la fonction instr()
dites que vous voulez réorganiser une chaîne au caractère de Rideau, mais ce n’est pas le même endroit à chaque fois
TEXTA = « abcdefg »
textb = « gfabdec »
textc = milieu (texta, instr (1, texta, « c »), len(texta) - instr (1, texta, « c ») + 1) & mid (texta, 1, instr (1, texta, « c ») - 1)
Notez la partie len(texta) - instr (1, texta, « c ») + 1 parce qu’instr compte le caractère vous cherchez donc vous revenez un caractère donc le mid() prend le caractère que vous recherchez comme premier dans la chaîne
textc est maintenant égal à « cdefgab »
textd = milieu (textb, instr (1, textb, « c »), len(textb) - instr (1, textb, « c ») + 1) & mid (textb, 1, instr (1, textb, « c ») - 1)
textd est maintenant égal à « cgfabde »
essayons de trouver un personnage qui n’est pas dans la chaîne
TEXTA = « abcdefg »
textc = milieu (texta, instr (1, texta, « h »), len(texta) - instr (1, texta, « h ») + 1) & mid (texta, 1, instr (1, texta, « h ») - 1)
vous obtenez une erreur parce que la partie de début de Mid() impossible = 0 puisque les chaînes commencent à 1
Il faut donc éviter l’erreur d’exécution. Il s’agit d’un moyen de le faire
TEXTA = « abcdefg »
Si instr (1, texta, « h ») <> 0 puis
textc = milieu (texta, instr (1, texta, « h »), len(texta) - instr (1, texta, « h ») + 1) & mid (texta, 1, instr (1, texta, « h ») - 1)
d’autre "qu’une seule instruction else par if situation
MsgBox « impossible de trouver caractère dans la chaîne » ' affiche un message avec la chaîne
fin si
Cela résume assez bien tout ce que vous devez savoir sur les chaînes