Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question? maVariablepour qu'elle s'inscrive dans la fenêtre.
Public Class Form1 Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim i As Integer Dim source = " un; deux" Dim separateur As String = ";" Dim t() As String = Split(source, separateur, , 1) Dim av As String = "Avant " Dim ap As String = " Après" Dim v As String = "" For i = 0 To UBound(t) v = v & av & Trim(t(i)) & ap & vbCrLf Next i TextBox1.Text = v 'Avant un Après 'Avant deux Après End Sub End Class
cRubrique = Famille.Text cKey = Type.Text istat = Get_Private_Profile_String(cRubrique, cKey, "0", cRepertoire, cIniFile) cRepertoire = Trim(cRepertoire) str_valeur = cRepertoire.Split(";")
cKey = Type.Text istat = Get_Private_Profile_String(cRubrique, cKey, "0", cRepertoire, ccIniFile)