Deux méthodes de variables de chaîne très utiles sont split et join Split () vous permet de diviser une ligne de texte et mettez chaque élément (mot ou une expression) dans un tableau;. Join () vous permet de joindre des éléments d'un tableau dans une ligne de texte. Un exemple ou deux pourraient éclaircir ce point.
Le Split () Méthode
Dans un projet ultérieur, vous devrez ouvrir un fichier texte et de lire son contenu. Vous pouvez lire le fichier ligne de texte en ligne, et chaque ligne peut être quelque chose comme ceci:
"UserName1, Password1, UserName2, Password2, UserName3, motdepasse3"
Le problème de programmation consiste à séparer chaque mot. Vous pouvez utiliser Split pour cela. Chaque mot sera alors séparé, prêt à vous placer dans un tableau. Voici un exemple pour vous d'essayer. (Il est préférable de mettre ce code derrière un bouton):
LineOfText Dim As String
I As Integer
Dim aryTextFile () As String
I As Integer
Dim aryTextFile () As String
LineOfText = "UserName1, Password1, UserName2, Password2"
aryTextFile = LineOfText. Split (",")
For i = 0 To UBound (aryTextFile)
MsgBox (aryTextFile (i))
Suivant i
Notez la ligne qui met en place un tableau:
Dim aryTextFile () As String
Nous ne savons pas combien d'éléments seront dans le tableau (combien
de mots sur chaque ligne), donc nous laissons les parenthèses vides. La ligne suivante vient de mettre du texte dans un appelé LineOfText variable. Mais cela peut provenir d'un fichier texte que vous ouvrez avec le code.
La ligne qui fait la séparation vient ensuite:
aryTextFile = LineOfText. Split (",")
Notez que aryTextFile a maintenant perdu ses parenthèses. Si vous les mettez, vous obtenez une erreur. L'utilisation de la méthode Split (), cependant, est la suivante:
LineOfText. Split (",")
Après le nom de la variable et l'arrêt complet, sélectionnez (ou type), le mot Split. Entre parenthèses vous mettez ce qui est connu comme séparateur. C'est le symbole ou le signe de ponctuation que vous utilisez pour séparer chaque élément de votre ligne. Dans notre cas, nous utilisons une virgule pour séparer les mots dans la ligne. Mais vous pouvez utiliser ce que vous voulez (un tiret, par exemple). Lorsque VB termine le fractionnement, il remplit votre tableau. Chaque élément va occuper un emplacement dans votre tableau. Ainsi, dans notre exemple, aryTextFile (0) tiendra une valeur de UserName1, aryTextFile (1) tiendra une valeur de Password1, etc
La boucle est là pour vous montrer comment faire une boucle autour de chaque élément dans votre tableau, et affiche les résultats dans une boîte de message:
For i = 0 To UBound (aryTextFile)
MsgBox (aryTextFile (i))
Suivant i
La première ligne comprend ceci:
LimiteSup (aryTextFile)
LimiteSup signifie limite supérieure d'un tableau. Entre les parenthèses de LimiteSup () vous tapez le nom de votre tableau. Remarquez, cependant que les parenthèses du tableau ont disparu à nouveau. Donc, si votre tableau était la suivante:
MyArray (9)
La limite supérieure de la matrice serait de 9. Donc la fin de la boucle serait alors 9. Vous code comme ceci quand vous ne savez pas combien d'éléments sont dans votre tableau. La boîte de message affiche tout ce qui est dans chaque position de votre tableau:
MsgBox (aryTextFile (i))
Le fait est que tous les mots de votre ligne de texte ont été divisés et placés dans un tableau. Vous devez maintenant savoir comment mettre le texte à nouveau ensemble. La méthode join ()
La méthode Join est utilisé lorsque vous souhaitez rejoindre les éléments d'un tableau à nouveau ensemble. Voici un code qui fait exactement cela.
LineOfText Dim As String
I As Integer
Dim aryTextFile (3) As String
I As Integer
Dim aryTextFile (3) As String
aryTextFile (0) = "UserName1"
aryTextFile (1) = "Password1"
aryTextFile (2) = "NomUtilisateur2"
aryTextFile (3) = "MotDePasse2"
aryTextFile (1) = "Password1"
aryTextFile (2) = "NomUtilisateur2"
aryTextFile (3) = "MotDePasse2"
LineOfText = Chaîne d'inscription. («-», AryTextFile)
MsgBox (LineOfText)
La ligne qui joint chaque élément dans le tableau est la suivante:
LineOfText = Chaîne d'inscription. («-», AryTextFile)
(REMARQUE:... Si vous avez une version plus ancienne du logiciel NET VB, utilisez LineOfText Rejoignez la place de String inscription) Entre les parenthèses de join (), vous tapez d'abord ce que vous voulez utiliser comme séparateur. Ici, nous utilisons un trait d'union comme séparateur. Ensuite, vous mettez le nom de votre tableau. Encore une fois les parenthèses du tableau ont disparu.
Lorsque la ligne s'exécute, le LineOfText variable contiendra les éléments suivants:
"UserName1-Password1-UserName2-Password2"
Une fois que vous avez les éléments du tableau réunis, vous pourriez alors écrire la ligne arrière de votre fichier texte. Split et join peut être très utile en effet. Surtout quand vous travaillez avec des fichiers texte. En parlant de cela, la section suivante traite exactement ce sujet.
0 commentaires:
Enregistrer un commentaire