Split sur une string mais de façon dynamique.
Bonjour,
J'ai un peu de mal à faire un truc qui me semble tout bête mais je ne sais pas trop comment m'y prendre.
ici par exemple :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
|
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim string1 As String = "Alain.France"
Dim string2 As String = "Roberto.Italie"
Dim string3 As String = "Michel.Belgique"
Dim string4 As String = "Manuel.Portugal"
Dim StringSeparée() As String
StringSeparée = Split(string1, ".")
MsgBox(StringSeparée(0))
MsgBox(StringSeparée(1))
End Sub |
J'obtiens donc un message box avec Alain, suivie d'un message box avec France.
J'aimerais faire de façon dynamique, une boucle donc qui l'équivalent de
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
|
Dim StringSeparée() As String
StringSeparée = Split(string2, ".")
MsgBox(StringSeparée(0))
MsgBox(StringSeparée(1))
Dim StringSeparée() As String
StringSeparée = Split(string3, ".")
MsgBox(StringSeparée(0))
MsgBox(StringSeparée(1))
Dim StringSeparée() As String
StringSeparée = Split(string4, ".")
MsgBox(StringSeparée(0))
MsgBox(StringSeparée(1)) |
J'avais pensé avec un do...loop avec un i qui s'incrementerait de + 1 à chaque bouclage. Mais en faisant un truc du style string & i ça ne fonctionne pas.
Auriez vous une idée comment je pourrais réaliser ceci ? (je voudrai éviter d'utiliser les tableaux, j'aimerais comprend le principe :) )
Merci