Récupérer le 5ème élément d'une chaine

Question

Bonjour &#224; tous,

Avec une liaison s&#233;rie je r&#233;cup&#232;re cette information "01DP152" dans un textbox, mais je voudrais juste r&#233;cup&#233;rer "152". J'ai vu qu'il y a un code dans ce site mais &#231;a ne m'aide pas du tout...

Merci d'avance

mortalino · Answer

Salut !

Essaie &#231;a : 

Dim Chaine1 As String, Chaine2 As String

Chaine1 = TextBox1.Text         'Valeur de la textbox, pense a mettre le nom de la TextBox que tu lui as mis)

Chaine2 = Mid(Chaine1, 5)     'Valeur de chaine1, &#224; partir du 5&#232;me caractere


@ ++

  Mortalino

demon_renard · Answer

salut

ta textbox s'appel Text1

Dim Recup As String
Recup= Mid$(Text1.text , 5, 3)

5 indique le 5&#232;me caract&#232;re et 3 la longueur de la cha&#238;ne.
Pour plus d'info voir MSDN

mortalino · Answer

Prend le code de Demon renard, tu gagnes une Ligne, si t'es en VB, c'est nickel, si t'es en VBA, ne met pas le $ apr&#232;s Mid.

C'est tout!!

@ ++

  Mortalino

NHenry · Answer

Bonjour

En VB.NET, pr&#233;f&#232;re MyStr.SubString(5).

Il est plus facile de batiser kk1 que de la convertir. (surtout en programmation)
Une question se pose sur le forum, pas en priv&#233;
NHenry (VB6, VBA excel, VB.NET, C++, C#.Net)

scoboy · Answer

Ok merci,
Dans mon cas j'vais essayer :

Text1.Text = Mid(MSComm1.Input,5)
Ca devrait marcher...

Récupérer le 5ème élément d'une chaine

5 réponses

Discussions similaires