تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] مثال على جلب ارقام من قاعدة البيانات وحفظها في مصفوفة
#1
مساء الخير اخواني

اذا ممكن انا محتاج كود او مثال على جلب مجموعة ارقام متسلسلة من قاعدة البيانات وحفظها في مصفوفة بطريقة عشوائية

للتوضيح .. تكون الارقام في قاعدة البيانات كالتالي :
1
2
3
4
5
6
7
8
9
10


واريد جلبها من قاعدة البيانات جميعها وحفظها في مصفوفة بطريقة عشوائية على النحو التالي

(5،4،7،10،6،9،2،1،3،9،8)

اريدها ان تكون في المصفوفة بطريقة عشوائية


*************************************
وايضا اذا ممكن كود يعرف اكبر رقم في قاعدة البيانات وانشاء كل مرة رقم عشوائي من 1 الى اكبر عدد بالقاعدة .. وسيقوم بفحص اذا كان الرقم موجود في مصفوفة او لا .. اذا غير موجود يتم اضافته الى المصفوفة

المهم ما يكون في تكرار للارقام بالمصفوفة ويكون كل الارقام موجودة كما كانت في قاعدة البيانات ولكن تخزن بالمصفوفة بطريقة عشوائية


وشكرا لكم

يرجى إفادتي بأسرع وقت ممكن
الرد }}}}
تم الشكر بواسطة:
#2
فيما يختص ب جلب البيانات من الداتا بيز ف الأمر متروك لك لكن فيما يختص ببقية السؤال فيمكن تعريف مصفوفة للارقام
PHP كود :
 Dim list As List(Of Integer) = New List(Of Integer

ثم تضيف لها الارقام كما تريد إما من الداتا بيز او مثل التالي

PHP كود :
For 0 To 10
            list
.Add(i)
 
       Next 


ثم تقوم بإنشاء مصفوفة أخري للارقام العشوائية .....بالرغم إن نا مش فاهم السبب في عمل Randoize للارقام لكن الكود التالي سوف يقوم بعمل ما تريد

PHP كود :
       Dim randomList = list.ToArray()
 
       Dim r = New Random()
 
       For i As Integer = list.Count To 2 Step -1
            Dim j 
As Integer r.[Next](i)
 
           Dim t randomList(j)
 
           randomList(j) = randomList(1)
 
           randomList(1) = t
        Next 


هذا الكود فقط للتاكد من كيفية استخدام الارقام العشوائية بشكل ما
PHP كود :
       For Each item As Integer In randomList
            
' do something with randomlist
            ListBox1.Items.Add(item)
        Next 

هذه الاكواد للحصول علي اعلي قيمة و اقل قيمة في كل من المصفوفتان

PHP كود :
       Dim max As Integer randomList.Max
        Dim min 
As Integer randomList.Min

        
'' أو'

        Dim maxValue As Integer = Me.list.Max
        Dim minValue As Integer = Me.list.Min 
الرد }}}}
تم الشكر بواسطة: Sajad , Sajad
#3
in form1 write this:-
randomize
_______________
for i = 1 to 10
s i = data.feild1 mod int(rnd*10
_______________
for j = 1 to 10
print s i

هذا كل ما استطيع مساعتك به ... وشكراً...
الرد }}}}
تم الشكر بواسطة:
#4
اعتقد ان صاحب السؤال ،، سؤاله متعلق في انتقاء اسئله عشوائه من قاعدة البيانات ،،، يعني برنامج مسابقات ،، اذا كان كذلك ،، فاقتراحي لك بالاستفاده من الاكواد التي بالاعلى و الاعضاء ما قصروا :

اولا : توليد عشره ارقام عشوائه يبدا من اول رقم في قاعدة البيانات الى اخر رقم مدى اختيار الرقم العشوائي
ثانيا : البحث في قاعدة البيانات بالارقام العشوائيه التي تم اختيارها مثال على ذلك
Select Q From TableName Where Q_ID='1' OR Q_ID = '6' Or Q_ID = '30' Or Q_ID = '24' OR ... الى اخره
أو
Select Q From TableName Where Q_ID In ( '1' , '6' , '30' , '24' )
الرد }}}}
تم الشكر بواسطة:
#5
myalsailamyشكراًجزيلا علي الموضوع اود التواصل مع الاستاذ 

الايمل ديلي elgahel_ahmed@live.it
او لو تكرمت ممك تسيبلي الايمل ديلك هني او اكتبلي عندي مو ضوع شبيه الي هذا واريد الماعده
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  بحث و إظهار صورة من قاعة البيانات علىPictureBox ahmed_elwerfalli 0 36 29-11-16, 01:34 AM
آخر رد: ahmed_elwerfalli
  [سؤال] كيفية اضافة عناصر عمود فى جدول من قاعدة بيانات فى جدول اخر hidn 1 163 04-11-16, 09:25 AM
آخر رد: thevirus
  [سؤال] قراءة رابط من قاعدة بيانات في ادة التصفح شمس الدين 03 2 77 27-10-16, 10:43 PM
آخر رد: شمس الدين 03
  [VB.NET] إيجاد الفرق بين مصفوفة وعمود مع إضافة المفقود rohiem 1 59 21-10-16, 08:21 AM
آخر رد: rohiem
  مساعدة في بناء قاعدة hglogtd 4 128 05-10-16, 03:48 PM
آخر رد: hglogtd
  استفسار حول طريقتي في قاعدة البيانات صبري زينوبي 0 76 29-09-16, 04:35 PM
آخر رد: صبري زينوبي
  ربط قاعدة بيانات اكسس بفجوال دوت نت 2015 كنونو 0 121 26-09-16, 01:35 PM
آخر رد: كنونو
  تسمية قاعدة البيانات قبل انشائها aiman 3 166 15-09-16, 09:12 PM
آخر رد: Abu Ehab
  [Acces2003] المساعدة في كود لحذف البيانات من الاستعلام محمد خلف زكي 2 138 28-08-16, 11:24 AM
آخر رد: محمد خلف زكي
Lightbulb [سؤال] كيف يتم رفع قاعدة بيانات mysql بطريقة برمجية sanosi 0 124 26-08-16, 05:00 PM
آخر رد: sanosi

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


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