الخطأ أن أداة TextBox لا تستطيع أن تضع فيها أكثر من 32768 حرف،
ومصدر الصفحة DocumentText يتجاوز الحد الأقصى للأداة،
لهذا لا داعي لوضع محتوى DoumentText في أداة TextBox،
فإما أن تتعامل مع DoumentText مباشرة أو تضعها في متغير نصي ثم تتعامل مع المتغير.
لأن المتغير النصي يتحمل حتى 2 جيجا حرف.
PHP كود :
Dim member_id = System.Text.RegularExpressions.Regex.Matches(WebBrowser1.DocumentText, "member_id=(.+)&")
For Each txt As System.Text.RegularExpressions.Match In member_id
If ListBox1.FindStringExact(txt.Groups(1).Value) = -1 Then
ListBox1.Items.Add(txt.Groups(1).Value)
End If
Next
Label1.Text = ListBox1.Items.Count