//MSDN
عشوائية
لإنشاء عدد صحيح عشوائي ضمن نطاق، استخدم الصيغة التالية: Int((upperbound-lowerbound+1)*Rnd+lowerbound)
هنا، الحد العلوي هو الحد الأعلى لنطاق الأرقام العشوائية، والحد الأدنى هو الحد الأدنى لنطاق الأرقام العشوائية.
----الدالة العشوائية في VB هي Rnd، ولكن أثناء عملية استخدامها وجدت أنه على الرغم من أن القيم التي يتم إنشاؤها بعد بدء تشغيل البرنامج هي عشوائية، إلا أن البرنامج سيولد نفس التسلسل الرقمي العشوائي في كل مرة يتم فيها إعادة تشغيل. ماذا علي أن أفعل؟
----النموذج الأولي للدالة العشوائية في VB هو: Rnd(number) ترجع الدالة Rnd قيمة أقل من 1 ولكنها أكبر من أو تساوي 0. تحدد قيمة الرقم (اختياري) كيفية قيام Rnd بإنشاء أرقام عشوائية. بسبب تحديد طريقة توليد أرقام عشوائية، في كل مرة يتم فيها تشغيل الدالة العشوائية، ستولد البذرة المعطاة في البداية نفس التسلسل، لأنه في كل مرة يتم استدعاء الدالة Rnd، يتم استخدام الرقم السابق في التسلسل كبذرة للرقم التالي.
----من أجل الحصول على تسلسل رقمي عشوائي مختلف في كل مرة يستدعي فيها البرنامج قيد التشغيل الوظيفة العشوائية، قبل استدعاء Rnd، استخدم أولاً عبارة Randomize بدون معلمات لتهيئة منشئ الأرقام العشوائية، الذي يحتوي على بذرة تم الحصول عليها وفقًا لمؤقت النظام بهذه الطريقة، إذا اتصلت بـ Rnd مرة أخرى، فستحصل على تسلسل رقمي عشوائي مختلف.
---- بالإضافة إلى ذلك، وفقًا لمبدأ العمل Randomize، يمكن للمستخدمين أيضًا تجميع وظائفهم العشوائية، أي استخدام وظيفة Timer للحصول على عدد الثواني التي مرت من منتصف الليل إلى الآن، ثم "الحساب" القيمة وفقًا لحجم القيمة العشوائية التي سيتم الحصول عليها "معالجة التوهين، يمكن تسمية القيمة التي تم الحصول عليها بهذه الطريقة بقيمة عشوائية حقًا.