[fouadhdfouad]

تفضل اخي

PHP كود :

Imports System.Text.RegularExpressions
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim gets = Regex.Matches(TextBox1.Text, "(?<=https://hypixel\.net/).+(?=/)", RegexOptions.Singleline)
        For Each mes As Match In gets
            TextBox2.Text = mes.Value
        Next
    End Sub
End Class