[ابراهيم مراد]

(18-06-14, 11:14 PM)سعود كتب : بعد التعديل

كود :

Imports System.Text.RegularExpressions

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        's.prop10="US";
        ' Dim str As String = "(s\.prop10=""US""?;)"
        Dim str As String = "(s\.prop10="")(US)(""?;)"

        Dim reg As New Regex(str)
        Dim ma As Match = reg.Match(TextBox1.Text)
        If ma.Success Then
            '  TextBox2.Text = ma.Value
            TextBox2.Text = ma.Groups(2).Value
        End If
    End Sub
End Class

اسف ولله تعبتك معى بس جرب تشيل US وتحط مثلا
FR فى التكست مش هيطلع حاجه وهيعمل خطا مينفعش تتعمل * ويدينى النص اليساوى اى ان كان؟ ومش عايز دى تظهر خالص s.prop10="US";
انا عاوز البلد بس