Extraire 15 caractères d'une chaine en VB

Résolu
Vince -  
 Vince -
Bonjour,

Dans une chaine de caractères (longueur variable) je souhaite
- identifier la présence de la chaine 3060
- et extraire les 11 caractères qui suivent directement cette chaine

le tout en VB pour pouvoir l'intégrer facilement dans mes outils

Merci de votre aide

1 réponse

  1. Yoda
     
    Bonjour,

    Dim Result as string, Chaine as string
    
    If InStr(Chaine, "3060") > 0 Then 
        Result = Mid(Chaine, InStr(Chaine, "3060") + 4, 11)
    Else
       Result=""
    End If


    A+.
    0
    1. Vince
       
      Un grand merci Yoda
      Cela a parfaitement fonctionné
      0