VB-Attraper les 4 premiers caractères dans la zone de texte

Je suis actuellement en train de travailler sur un très basic scripting language (appelé EngineScript) qui obtient les 4 premières lettres d'une zone de texte de contenu (dans un Formulaire Windows projet) et la compare à une liste de mots-clés, puis utilise les caractères restants pour former un argument pour les mots clés...
Je me demandais temps, vous avait un peu de code idées sur la façon de faire pour passer les 4 premières lettres dans une variable et ensuite le reste des caractères dans une autre.
Ma langue sera seule commande.. j'.e, vous aurez seulement être en mesure d'exécuter une commande par programme.

InformationsquelleAutor Vladimar Chudnofski | 2013-04-27
  1. 5

    Chaîne de caractères.Substring() devrait fonctionner:

    Dim first4Chars = TextBox1.Text.Substring(0, 4)
Dim restOfChars = TextBox1.Text.Substring(4)
    • MERCI @Andy, je vais le Tester
    • Excellente solution @Andy!
    • Vous devez accepter cette réponse si ça répond à votre question. 🙂
    InformationsquelleAutor Andy
  2. 1

    Je vais vous montrer une bonne idée sur la façon d'obtenir les quatre premières lettres, et de voir ce que vous pouvez mettre en place avec cela. VB a été une douleur dans mon cou!! J'ai lutté à travers elle, et rendu compte que c'est la seule façon d'apprendre.. =) 

    dim substring as string

substringA = Left$("Entered String", 4)

strSubstrA = "Ente"

substringB = Left$("What about a space?", 6)

strSubstrB = "What a"
    • Merci je vais tester cela
    InformationsquelleAutor nckbrz
  3. 0

    quelque chose comme ceci:

    Dim l4 as string, rest as string
l4 = LEFT(TextBox1.Text, 4)
rest = MID(TextBox1.Text, 5, LEN(TextBox1.Text))
    • Merci je vais tester cela
    • Désolé...je dois mentionner que j'utilise VS2012...La GAUCHE()' code est censé être seulement pour les entiers/numéros dans VB2012...connaissez-vous d'autres façons
    • Non, ce n'est pas vrai. La fonction de GAUCHE encore fonctionne de la même comme elle le fait depuis 30 ans. Voici la VB2012 doc: msdn.microsoft.com/en-us/library/...
    InformationsquelleAutor RBarryYoung
  4. 0

    Votre question n'est pas trop clair ..

    Mais vous pouvez essayer ce

    dim sVar as string = mid(TextBox1.text,1,4)
    InformationsquelleAutor matzone
  5. 0

    Attention avec Substring() fonction, car elle suppose que la zone de texte longueur est plus grande ou égale à la deuxième paramètre. Alors, si dans votre entrée de quelqu'un met moins de 4 caractères, il va exploser.

    Vous devez pour être sans danger:

    Dim txt1 as String = Textbox1.Text
Dim first4Chars = If(txt1.Length > 4, txt1.Substring(0, 4), txt1.SubString(0,text.Length))
    InformationsquelleAutor DiegoS