[مشروع] لعبة الروليت - نسخة قابلة للطباعة

[مشروع] لعبة الروليت - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم امثلة ومشاريع VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=188)
+--- الموضوع : [مشروع] لعبة الروليت (/showthread.php?tid=31048)

لعبة الروليت - أمجد وضاح - 23-08-19

هذه لعبة الروليت نقوم بإضافة
3صور مكتوب فيها الرقم 7
2 أزرار
3 نصوص
1تايمر
1 نص مسطر
رتب الأدوات كما في الصورة
3 النصوص مكتوب فيها الرقم 0
الزر الأول المكتوب فيه إبدأ

كود :

Timar1.Start()

PictureBox1.Visible = False

        PictureBox2.Visible = False

        PictureBox3.Visible = False

        Label1.Text = CStr(Int(Rnd() * 10))

        Label2.Text = CStr(Int(Rnd() * 10))

        Label3.Text = CStr(Int(Rnd() * 10))

        If (Label1.Text = "7") Then

            PictureBox1.Visible = True

        End If

        If (Label2.Text = "7") Then

            PictureBox2.Visible = True

        End If

        If (Label3.Text = "7") Then

            PictureBox3.Visible = True

        End If

        If Label1.Text = "7" And Label2.Text = "7" And Label3.Text = "7" Then

            LinkLabel1.Text = "لقد فزت"

        End If

الزر الثاني خروج معروف

كود :

()Me.Close

RE: لعبة الروليت - asemshahen5 - 23-08-19

مشكور اخي الكريم على هذه اللعبة بس في ملاحظة واحدة طبقت اللعبة و جربتها و لم افز الى غاية الان هليوجد لها ملفات غش .

بجد لعبة جميلة جزاك الله عنا كل خير .

بس عدل الشرط ليكون :

PHP كود :

If Label1.Text = "7" And Label2.Text = "7" And Label3.Text = "7" Then 

RE: لعبة الروليت - أمجد وضاح - 23-08-19

أخي أنا صممت اللعبة لم أفز جرب تغيير التكرار من10 إلى 14
أنا أفوز بإثنتين

RE: لعبة الروليت - asemshahen5 - 23-08-19

انا جربت وو ضعتها مع تايمر لتلعب لوحده و لغاية الان لم افز بعد 500 محاولة .

باركلي لقد فزت بعد 1120 محاولة طبعا عن طريق التايمر .

من غير تتغيير اي شيئ .

[attachment=22711]

[attachment=22707]

RE: لعبة الروليت - أمجد وضاح - 23-08-19

هههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههههه ولازلت أضحك سأقوم بتطويرها عن طريق التايمر شكرا للمعلومة

RE: لعبة الروليت - سعود - 23-08-19

ممكن تبرمج فكرة الجمع والطرح ولو تريدها اعقد ضرب و قسمة ويتم تغيير نوع العملية الحسابية والارقام والنتائج المعروضة كل مدة معينة من الثواني اتوقع ستكتشف معلومات كثيرة عند تطبيق الفكرة ......تحياتي اخي الكريم.

RE: لعبة الروليت - أمجد وضاح - 23-08-19

شكرا أخي سعود سأطبق الفكرة