20-01-20, 09:37 PM
20-01-20, 09:58 PM
قبل ما تظيف العنصر تأكد أنه به معلومة مفيدة مثل
PHP كود :
If txt.Trim<>"" Then ListBox1.Items.Add(txt)
20-01-20, 10:05 PM
(20-01-20, 09:58 PM)جميل5 كتب : [ -> ]قبل ما تظيف العنصر تأكد أنه به معلومة مفيدة مثلاشكرك اخ جميل
PHP كود :
If txt.Trim<>"" Then ListBox1.Items.Add(txt)
ولكن فيه خطاء في كلمه تكست
(20-01-20, 09:58 PM)جميل5 كتب : [ -> ]قبل ما تظيف العنصر تأكد أنه به معلومة مفيدة مثلانا اضيف العناصر من خلال النت من الكود ده
PHP كود :
If txt.Trim<>"" Then ListBox1.Items.Add(txt)
كود :
Dim member_id1 = System.Text.RegularExpressions.Regex.Matches(TextBox2.Text, "<strong>(.+?)</strong>")
For Each txt As System.Text.RegularExpressions.Match In member_id1
If ListBox11.FindStringExact(txt.Groups(1).Value) = -1 Then
ListBox11.Items.Add(txt.Groups(1).Value)
End If
20-01-20, 10:14 PM
الخطأ لأنك تستخدم نفس اسم المتغير txt
حسنا هذا التعديل
حسنا هذا التعديل
PHP كود :
Dim member_id1 = System.Text.RegularExpressions.Regex.Matches(TextBox2.Text, "<strong>(.+?)</strong>")
For Each txt As System.Text.RegularExpressions.Match In member_id1
if txt.Groups(1).Value.trim<>"" then ListBox11.Items.Add(txt.Groups(1).Value)
20-01-20, 10:32 PM
مرحبا قم باضافة اداة التايمر الي المشروع وقم بوضع هذا الكود
وداخل الفورم لود ضع هذا الكود
موفق
كود :
For i = 1 To 9999
ListBox1.Items.Remove("")
Next
كود :
Timer1.Start()
موفق