تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
التحقق من المصفوفة
#1
السلام عليكم
عندما اقوم بعمل اداة TextBox ك مصفوفة تتكون من عدد معين ولنفرض 10 وذلك عن طريق الكود

ما هي طريقة التحقق من ان كل TextBox  يحتوي على ما اريد

وفي  حال عدم التحقق يتم الاشعار ب مسج بوكس

انا عملت التالي ولكن الكود طويل    اريد اختصاره

كود :
If TextBox(0).Text = "1" And TextBox(1).Text = "2" And TextBox(2).Text = "3" _
           And TextBox(3).Text = "4" And TextBox(4).Text = "5" And TextBox(5).Text = "6" _
           And TextBox(6).Text = "7" And TextBox(7).Text = "8" And TextBox(8).Text = "9" _
           And TextBox(9).Text = "10" Then
MsgBox("لقد فزت", MsgBoxStyle.Information, "تهانينا")
End If
اللهم صلي على نبينا محمد
الرد
تم الشكر بواسطة: ابو انس
#2
استخدم حلقة تكرار فهي تختصر الكود الذي كتبته بشكل كبير

كود :
for a as integer =0 to 10
if textbox(a).text="something" then
msgbox("correct")
else
msgbox("wrong")
end if
next

الرد
تم الشكر بواسطة: Mtaktak , Mtaktak , ابو انس
#3
شكرا اخي على مرورك
بالنسبة للكود الذي وضعته انت جزاك الله خيرا صحيح اذا كنت تريد التحقق من نتيجة واحدة فقط  وانا اعرف ذلك
ولكن هل ينطبق هذا الكود في حال كان التحقق من نتائج مختلفة مثل المثال الذي انا وضعته

بمعنى ان Textbox(1) يتضمن رقم ٧
بينما  Textbox(2)  يحتوي على رقم ١٠ فرضا

وهكذاا


وشكرا لك
اللهم صلي على نبينا محمد
الرد
تم الشكر بواسطة: ابو انس
#4
يبدو اني وجد الحل
كود :
Dim win As Integer
       Dim i As Integer
       Do While i <= 15
           i = i + 1
           If Val(Btns(i - 1).Text) = i Then
               win += 1
           End If
       Loop
       If win = 15 Then
           MsgBox("لقد فزت  " & "عدد المحاولات   " & count, MsgBoxStyle.Information, "تهانينا")
           win = 0
           i = 0
       End If
       count += 1

شكرا لتفاعلكم  ومروركم
اللهم صلي على نبينا محمد
الرد
تم الشكر بواسطة: ابو انس , معاند الحظ


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيفيه التحقق من الجدول بقاعدة البيانات حسن الجلب 2 445 28-03-22, 04:59 AM
آخر رد: Taha Okla
  [VB.NET] اريد مساعدة في كود التحقق من البيانات في قاعدة اكسس Safwan_Daw 2 681 22-03-22, 12:39 AM
آخر رد: Safwan_Daw
  [سؤال] كيفيه التحقق من الأرقام حسن الجلب 3 369 15-01-22, 06:25 PM
آخر رد: سعود
  طلب كود التحقق من وجود الاتصال بالانترنت bidaya 6 4,300 16-06-21, 06:49 PM
آخر رد: aliahmed-85
  السلام عليكم سؤال في التحقق من المتغييرات اليوم السابع 3 771 19-02-21, 11:38 PM
آخر رد: اليوم السابع
  [سؤال] كود التحقق من شئ حسن الجلب 5 787 29-01-21, 03:49 AM
آخر رد: cofie
  التحقق من فورم إذا كان موجود محمد خيري 6 1,409 02-10-20, 03:55 AM
آخر رد: عبد العزيز البسكري
Heart [سؤال] السلام علام مطلوب طريقة التحقق من كول الكلمة المتكرار في اليسة بوكس وضعها في التيكس ب Ali 2020 0 926 01-10-20, 12:38 AM
آخر رد: Ali 2020
  ما هو كود التحقق من العمر fay_gh 2 609 26-09-20, 05:58 PM
آخر رد: fay_gh
  [سؤال] طريقة التحقق هل انا وقف علي اخر سطر في اليسة بوكس Ali 2020 1 795 10-09-20, 07:22 AM
آخر رد: diggitalk2017@gmail.com

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


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