+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : كود تحديد رقم عشوائي (/showthread.php?tid=29427)
كود تحديد رقم عشوائي - alshandodi - 20-04-19
السلام عليكم ورحمة الله وبركاته
ابحث عن طريقة لعمل قرعة على ارقام هواتف فيكون الذي يظهر رقمة هو الفائز هل يمكنكم مساعدتي وهل سؤالى واضح
RE: مساعدة - elgokr - 20-04-19
وعليكم السلام ورحمة الله وبركاته
فقط كل ما تحتاج اليه هو استخدام RAND / RND
[ Random ]
اما من خلال كود الاستعلام مباشراً اذا كنت تقوم بجلب البيانات من قاعدة البيانات
أو من خلال الكود التنفيذى فكلاهما واحد يمكنك البحث عن الامر وستجد لها شروحات
فابسط ما يكون من خلال الاستعلام بقاعدة البيانات
اذا كان قاعدة بيانات MsSql
كود :
SELECT * FROM Table ORDER BY RAND() LIMIT 1كود :
SELECT TOP 1 id FROM Table ORDER BY RND(id)تحياتى لك
وتمنياتى لك التوفيق
RE: مساعدة - alshandodi - 20-04-19
(20-04-19, 09:37 AM)elgokr كتب :وعليكم السلام ورحمة الله وبركاته
فقط كل ما تحتاج اليه هو استخدام RAND / RND[ Random ]اما من خلال كود الاستعلام مباشراً اذا كنت تقوم بجلب البيانات من قاعدة البياناتأو من خلال الكود التنفيذى فكلاهما واحد يمكنك البحث عن الامر وستجد لها شروحات
فابسط ما يكون من خلال الاستعلام بقاعدة البيانات
اذا كان قاعدة بيانات MsSqlواذا كان قاعدة بيانات Accessكود :
SELECT * FROM Table ORDER BY RAND() LIMIT 1
كود :
SELECT TOP 1 id FROM Table ORDER BY RND(id)
تحياتى لكوتمنياتى لك التوفيق
اشكرك اخي ولكن الكود لم يعمل لدي او انني لم اعرف ان استخدمه
سارسل لك السورس كود واتمنى من الجميع الاستفادة وافادتي فانتم اهل للمساعده
واهل لهذا المنتدى الذي علمني الكثير
RE: كود تحديد رقم عشوائي - elgokr - 20-04-19
انت لا تحتاج الى Timer
وما شبه اخى الحبيب فقط كل ما عليك فعله هو
استخدام الكود التالى فى حدذ اى زر او حسب ما تريد
كود :
DT_RND = New DataTable
DT_RND.Clear()
adapter = New OleDbDataAdapter("SELECT TOP 1 * FROM Rnd_Number ORDER BY RND(Number)", con)
adapter.Fill(DT_RND)
Lbl_Number.Text = DT_RND(0)(2)تحياتى لك
وتمنياتى لك التوفيق