[سعود]

كيف ابحث عن قيمة متغيرة في مصفوفة
مثلا اريد ان استعلم عن textbox1.text هل موجودة بالمصفوفة ام لا

[Sajad]

السلام عليكم

انظر الى هذا الكود:

PHP كود :

Dim arr As String() = {"ahmed", "sajad", "yasir", "hamad", "samad"}
        If arr.Contains(TextBox3.Text) Then
            MessageBox.Show("Found")
        Else
            MessageBox.Show("Not Found")
        End If 


بالتوفيق ان شاءالله

[سعود]

لكنها تاتي حتى لو الكلمة ناقصة مثلا لو بحثت عن ahm ويوجد ahmed سيعيد true

[Aly El-Haddad]

السلام عليكم

انظر الى هذا الكود:

كود :

Dim arr As String() = {"ahmed", "sajad", "yasir", "hamad", "samad"}
        If Array.IndexOf(arr, TextBox1.Text) <> -1 Then
            MsgBox("Found!")
        Else
            MsgBox("Not Found!")
        End If

بالتوفيق ان شاءالله

(عفواً على الأقتباس أخي sajad)

[Aly El-Haddad]

Aly El-Haddad كتب :السلام عليكم

انظر الى هذا الكود:

كود :

Dim arr As String() = {"ahmed", "sajad", "yasir", "hamad", "samad"}
        If Array.IndexOf(arr, TextBox1.Text) <> -1 Then
            MsgBox("Found!")
        Else
            MsgBox("Not Found!")
        End If

بالتوفيق ان شاءالله

(عفواً على الأقتباس أخي sajad)

كتبت هذه المشاركة قبل تجربة كود الأخ sajad
بعد تجربته وجدت أنه يعمل بشكل صحيح!

[سعود]

بارك الله فيكم جميعا
ماذا لو اردت استخدام stringbuilder

كود :

Dim all As New StringBuilder

ثم الحق له نص جديد

كود :

all.Append("saud#")

والان كيف ابحث ضمن all ؟

[Aly El-Haddad]

كود :

all.ToString()

؟
عفواً أستاذ سعود ممكن توضح المطلوب؟

[سعود]

شوف اخي الكريم ضع متغير في موديول وصرحه بشكل عام يعني

كود :

public all as new stringbuilder

ثم بزر امر اسند له قيمة

كود :

all.append("textbox1.text)

ضع قيمة جديدة عند كل نقر زر
ستتعبا all بالبيانات
كيف ابحث عن نص معين مكتوب بـ textbox2.text

[سعود]

كود :

Dim pat As New Regex(lbl.Text)        
Dim m As Match = pat.Match(all.ToString)
        If m.Success Then
            MsgBox("found")
        Else
            MsgBox("NO")
        End If

طيب اخواني من يعدل على الكود هذا بحيث يبحث عن كامل الجملة؟

[سعود]

للاسف .. لم اتوقع صعوبة التعامل مع المصفوفات.