Substring
Une autre méthode de chaîne utile est Substring. Cela vous permet de saisir une chaîne dans une autre. (Par exemple, si vous voulez attirer l'. "Com" à partir de l'adresse e-mail "me@me.com")Entre les parenthèses de la chaine (), vous spécifiez une position de départ, et puis combien de caractères que vous voulez prendre (la numérotation commence à zéro encore une fois). Comme ceci:
Dim Email as String
DotCom As cordes
DotCom As cordes
Email = "me@me.com"
DotCom = Email. Chaine (5, 4)
DotCom = Email. Chaine (5, 4)
MsgBox (DotCom)
La boîte de message serait alors afficher les caractères attrapé par la chaîne, dans ce cas, le ". Com" à la fin (commencer à la position 5 dans la chaîne et de saisir 4 caractères). Vous pouvez également faire une vérification pour voir si une adresse électronique a pris fin en "com." Comme ceci:
Dim Email As String
DotCom Dim As String
DotCom Dim As String
Email = "me@me.con"
. DotCom = Email chaine (Email.Length - 4, 4)
. DotCom = Email chaine (Email.Length - 4, 4)
Si DotCom = ". Com" Alors
MsgBox ("Fin de Dot Com")
Else
MsgBox ("ne s'arrête pas à Dot Com")
End If
La position de départ de chaine (), cette fois est "Email.Length - 4". C'est la longueur de la variable de type chaîne appelée Email, moins 4 caractères. Les 4 autres moyens "grippage quatre caractères" Vous devez être prudent, cependant. S'il n'y avait pas quatre caractères pour saisir, VB serait vous donner un message d'erreur.
Nous pourrions remplacer les Chars () boucle for code que nous avons écrit plus tôt avec une méthode substring (). Le résultat serait le même. Voici le code:
For i = 0 To TextLength - 1
OneCharacter = prénom. Chaine (I, 1)
MsgBox OneCharacter
MsgBox OneCharacter
Suivant i
Nous disons donc: «Début caractères accaparement de la position i. Suffit de saisir un caractère". Substring et Chars sont des méthodes très utiles à utiliser lorsque vous voulez vérifier les lettres dans une chaîne de texte.
Dans la partie suivante, nous allons jeter un oeil à la Equals, de remplacer et insérer méthodes.
0 commentaires:
Enregistrer un commentaire