[ana ali]

سلام عليكم ابغى كود يستخرج لي كلمات معينة في  RichTextBox  وعرضها في TextBox
مثال: image = 2016NSP17.jpg
كل اللي ابغاه يستخرج لي  2016NSP17.jpg فقط
طبعا يضعها في TextBox1

[سعود]

PHP كود :

Imports System.Text.RegularExpressions
Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        'image = 2016NSP17.jpg
        Dim str As String = "image =.*? (.*?\.jpg)"
        Dim reg As New Regex(str)
        t.Text = reg.Match(r.Text).Groups(1).Value
    End Sub
End Class 


[ana ali]

جميل، اشتغل معي الكود طيب لو بزيد مثلا TextBox جديد لكلمة ثانية بنفس الزر لنفس الجملة

[سعود]

PHP كود :

Imports System.Text.RegularExpressions
Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim str As String = "image =.*? (.*?\.jpg)"
        Dim reg As New Regex(str)
        Dim mc As MatchCollection = reg.Matches(r.Text)
        TextBox1.Text = mc(0).Groups(1).Value
        TextBox2.Text = mc(1).Groups(1).Value
        TextBox3.Text = mc(2).Groups(1).Value
        TextBox4.Text = mc(3).Groups(1).Value
    End Sub
End Class