[أبو عبدالله الحلواني]

إقتباس :كيف استخرج أول رابط فقط من الروابط التى تم استخراجها ؟

استخدم متغير من نوع تكست مثل هذا التعديل لتجلب به أول قيمة فقط من الروابط 

PHP كود :

Imports HtmlAgilityPack
Imports System.Text
Imports System.Net

Public Class Form

    

Dim WithEvents wb As New WebBrowser
Dim n as integer = 0 
Dim FirstLink as string


    Private Sub Form_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
  wb.ScriptErrorsSuppressed = True 
  Button1.PerformClick()
    End Sub

    Private Sub Button1_Click_1(sender As System.Object, e As System.EventArgs) Handles Button1.Click  
        wb.Navigate(New Uri(TextBox1.Text))
    End Sub

    Private Sub wb_DocumentCompleted(sender As Object, e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles wb.DocumentCompleted
        If wb.Document IsNot Nothing Then
        

    For Each link As HtmlElement In wb.Document.Links
                n+=1
If link.GetAttribute("href").Contains("googlevideo.com") Then
                    rtxt.AppendText(link.GetAttribute("href") & vbNewLine)
If n=1 then   
FirstLink = link.GetAttribute("href")      
End if   
                End If
            Next
        End If
    End Sub
End Class