Bonjour,
Je voudrais dans une chaine de caracteres extraite le string entre %%. Le string entre %% correspond a une variable qui contient une valeur. Puis reafficher la ligne non pas avec %% mais la valeur de la variable.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
        Dim Var_00 As String = ""
        Dim A_00 As Integer = 0
        Dim A_01 As Integer = 0
        Dim DF As String = ""
        Dim DFGH As String = ""
        DFGH = Now.ToString("HH, mm, s")
        ListBox1.Items.Add(DFGH)
        Var_00 = "Le poids %DFGH% est lourd"
        Dim r As Char() = {"%"}
        A_00 = Var_00.IndexOf(r) ' start 0
        A_01 = Var_00.LastIndexOf(r)
        ListBox1.Items.Add(A_00.ToString)
        ListBox1.Items.Add(A_01.ToString)
        DF = Mid(Var_00, A_00 + 2, (A_01 - A_00) - 1) 'DFGH
        ListBox1.Items.Add("Le poids " & DF & " est lourd")
        ListBox1.Items.Add("Fin")