Dim curDirectory As String = Environment.CurrentDirectory If Not curDirectory.EndWith("") Then curDirectory = curDirectory & ""
Left(chaine, 10) <==> Mid(chaine, 1, 10) Right(chaine, 10 <==> Mid(chaine, Len(chaine)-10,10)
chaine.SubString((chaine.Lenght - 1) - 10 , 10)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionDim MaChaine As String = "ABC" 'renvoi B return MaChaine.MidNet(2,1) 'renvoi A return MaChaine.LeftNet(1) 'renvoi C return MaChaine.RightNet(1)