تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف ابحث عن قيمة متغيرة في مصفوفة
#1
كيف ابحث عن قيمة متغيرة في مصفوفة
مثلا اريد ان استعلم عن textbox1.text هل موجودة بالمصفوفة ام لا
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

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

PHP كود :
Dim arr As String() = {"ahmed""sajad""yasir""hamad""samad"}
        If 
arr.Contains(TextBox3.TextThen
            MessageBox
.Show("Found")
        Else
            
MessageBox.Show("Not Found")
        
End If 

بالتوفيق ان شاءالله
الرد }}}}
تم الشكر بواسطة:
#3
لكنها تاتي حتى لو الكلمة ناقصة مثلا لو بحثت عن ahm ويوجد ahmed سيعيد true
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم

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

كود :
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)
Big Grin
الرد }}}}
تم الشكر بواسطة:
#5
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)
Big Grin

كتبت هذه المشاركة قبل تجربة كود الأخ sajad
بعد تجربته وجدت أنه يعمل بشكل صحيح!
الرد }}}}
تم الشكر بواسطة:
#6
بارك الله فيكم جميعا
ماذا لو اردت استخدام stringbuilder
كود :
Dim all As New StringBuilder

ثم الحق له نص جديد
كود :
all.Append("saud#")

والان كيف ابحث ضمن all ؟
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#7
كود :
all.ToString()
؟
عفواً أستاذ سعود ممكن توضح المطلوب؟ Smile
الرد }}}}
تم الشكر بواسطة:
#8
شوف اخي الكريم ضع متغير في موديول وصرحه بشكل عام يعني
كود :
public all as new stringbuilder
ثم بزر امر اسند له قيمة
كود :
all.append("textbox1.text)

ضع قيمة جديدة عند كل نقر زر
ستتعبا all بالبيانات
كيف ابحث عن نص معين مكتوب بـ textbox2.text
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#9
كود :
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
طيب اخواني من يعدل على الكود هذا بحيث يبحث عن كامل الجملة؟
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:
#10
للاسف .. لم اتوقع صعوبة التعامل مع المصفوفات.
أستودعكم الله الذي لا تضيع ودائعه أرجو ان تجدوا بمشاركاتي ما يجعلكم تدعون لي بخير ان تحتم غيابي.
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ازاى اما اكتب قيمة فى التكست بوكس يتاكد انها مش موجودة فى الداتا جريدفيو araxis 1 60 07-12-16, 11:22 AM
آخر رد: ممدوح الخطيب
  طلب مساعدة ناتج طرح عددين قيمة سالبه khalaroy 2 65 01-12-16, 03:09 AM
آخر رد: khalaroy
Music طلب : كود ترتيب مصفوفة ثنائية تصاعدياً + كود ضرب مصفوفة ثنائية سوسن جاد الله 2 74 27-11-16, 09:29 AM
آخر رد: amgad525
  الاخوة الاعزاء ابحث عن مثال للتنبيه بقرب انتهاء تاريخ بشرط ان احدد المدة trfa8899 4 139 21-11-16, 11:00 AM
آخر رد: trfa8899
  نقل قيمة من تكست بوكس الي تكست بوكس فى نموذج اخر السيد الجوهري 4 113 05-11-16, 07:39 PM
آخر رد: shwehdi4pc
  أرسال قيمة من UserControl الى Form Rabeea Qbaha 5 102 16-10-16, 06:47 PM
آخر رد: Rabeea Qbaha
  سؤال : عن داتا قريد تقسيم قيمة الى عمودين abid 5 124 13-10-16, 04:40 AM
آخر رد: abid
  البحث بواسطة قيمة فارغه هاوي1995 2 127 22-09-16, 05:57 PM
آخر رد: هاوي1995
  حل لكود مسح قيمة واحدة من TextBox أحمد محمد جمعة 0 120 04-09-16, 04:19 PM
آخر رد: أحمد محمد جمعة
  [نقاش] كيف اعرف قيمة برنامجي و كم يكلف للبيع Rabeea Qbaha 13 476 30-08-16, 09:06 PM
آخر رد: Rabeea Qbaha

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم