+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] مساعدة في ربط فيجوال دوت نت مع داتا بيس اكسس (/showthread.php?tid=19600)
مساعدة في ربط فيجوال دوت نت مع داتا بيس اكسس - abdokablan - 11-03-17
انا الان اقوم بتصميم منضومة اسئلة ، مع اني مبتدئ بالبرمجة ولكني مصّر على استكمالها
صورة من قاعدة البيانات
هذه نافذة الاقسام
وهذه نافذة الأسئلة
النافدة يظهر بها مؤقت و group به ارقام الأسئلة (مرئي) ، و group به السؤال والاختيارات (مخفي) ، وعند الضغط على رقم السؤال يظهر group الاسئلة والاختيارات الذي بالاعلى ويختفي group الأرقام
لنفترض الآتي :
مربع المخصص للسؤال : q.text / مربع الخيار 1 : a.text / مربع الخيار 2 : b.text / مربع الخيار 3 : c.text
--------------------------------------------------------------------------
المطلوب : مثلا عند الضغط على الزر رقم (1) في ال group
يأخد السؤال من العمود Qsubjct من الصف الذي فيه Q_id =1 في قاعدة البيانات التي اسمها DBace ويضعها بمربع السؤال فوق (q.text) //الرجاء النظر في صورة قاعدة البيانات للفهم أوضح //
ويأخذ الخيار الأول من العمود Amswr_a من الصف الذي فيه Q_id =1 في قاعدة البيانات التي اسمها DBace ويضعها بمربع الخيار الاول (a.text)
ويأخذ الخيار الثاني من العمود Amswr_b من الصف الذي فيه Q_id =1 في قاعدة البيانات التي اسمها DBace ويضعها بمربع الخيار الثاني (b.text)
ويأخذ الخيار الثالث من العمود Amswr_c من الصف الذي فيه Q_id =1 في قاعدة البيانات التي اسمها DBace ويضعها بمربع الخيار الثالث (c.text)
وهذا الكود الحالي بالزر رقم 1 في group الخاص بالأسئلة :
كود :
هذا السطر البرمجي خاص بتشغيل موسيقى حماسية//
My.Computer.Audio.Play(My.Resources.n, AudioPlayMode.Background)
'sndPlaySound("D:\n.wav", 1)
هذان السطران البرمجيان خاص بإظهار المؤقت//
Label1.Visible = True
Timer1.Start()
هذا السطر خاص بإظهار ال group الخاص بالسؤال والخيارات//
GroupBox1.Visible = True
وهذه الاسطر وضعتها مثال//
q.Text = "ssssssss"
a.Text = "aaaa"
b.Text = "bbbb"
c.Text = "cccc"
هذا السطر خاص بإخفاء group الخاص بأرقام الأسئلة//
GroupBox2.Visible = False
هذه الاسطر خاصة بتغيير لون الزر//
' BT1.BackColor = Color.Red
My.Settings.BT1 = Color.Redناتج هذا الكود :
ان شاء الله نكون شرحتلكم المشكلة بالكامل ، وارجو مساعدتي بهذه المشكلة تكفووون
وأعدكم ان شاء الله عند استكمالها ، سأقوم برفعها حصرا على هذا المنتدى الكريم ^^