الحصول على نطاق من القيم الملخبطة - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94) +--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167) +--- الموضوع : الحصول على نطاق من القيم الملخبطة (/showthread.php?tid=8463) |
الحصول على نطاق من القيم الملخبطة - ناجي إبراهيم - 13-04-13 [COLOR="#0000CD"]السلام عليكم... في المرفقات وحدة برمجية (Module) باسم MShuffling - ضمن مشروع مثال - تحتوي على إجراء و دالتين للحصول على نطاق من القيم الملخبطة (مرتبة عشوائياً) أو تمرير مصفوفة ذات قيم و إعادة نسخة ملخبطة منها. * الإجراء ShuffleArray يعمل على لخبطة قيم المصفوفة الممررة نفسها. * الدالة GetShuffledCopyOfArray تعيد نسخة ملخبطة من المصفوفة الممررة. * الدالة CreateShuffledArray تعيد مصفوفة ملخبطة من قيم محصورة بين قيمتين ممررتين. = في المشروع أيضاً نافذة بثلاثة أزرار لتجربة الإجراء و الدالتين. = يحتوي الكود على بعض التوضيحات باللغة العربية. = الأكواد مبنية على خوارزمية "فيشر - ياتس" (Fisher–Yates)، و النسخة المعدلة منها لـ "دورستنفيلد" (Durstenfeld). نرجو الاستفادة و السلام. [/COLOR] الحصول على نطاق من القيم الملخبطة - VB_Coder - 14-04-13 السلام عليكم - ماشاء الله عليك أخي ناجي ، مثال متقدم ومفيد وجميل وراقي من شخص مبدع وراقي . الله يعطيك العافيه . - تحياتي لك . الحصول على نطاق من القيم الملخبطة - ناجي إبراهيم - 14-04-13 السلام عليكم... أشكرك أخي VB_Coder... و لا يمكن لأحد أن يتجاهل إبداعاتك أنت فيما تقدمه من مواضيع و إجابات. سلام. |