كود بسيط لتوليد ارقام عشوائية

[IM.com]

كود PHP:

Dim objRandom As New System.Random( _
  CType(System.DateTime.Now.Ticks Mod System.Int32.MaxValue, Integer)) 

Public Function GetRandomNumber( _
  Optional ByVal Low As Integer = 1, _
  Optional ByVal High As Integer = 100) As Integer
  ' Returns a random number,
  ' between the optional Low and High parameters
  Return objRandom.Next(Low, High + 1)
End Function 


وطريقة استدعائها هي كالتالي :

كود PHP:

Dim MyRand As Integer
 MyRand = GetRandomNumber(1, 6)
 MessageBox.Show("Your Random Number Is " & MyRand.ToString) 


[IM.com]

الكود با ستخدام C#

نحتاج في الكثير من برامجنا إلى توليد أرقام عشوائية بطريقة أو بأخرى، و غالباً ما نستخدم الدالة Rand ، و لكن لو أمعنا النظر في نتائج هذه الدالة لوجدنا أنها تولد الأرقام بنسق معين Pattern يمكن التنبئ به. و هذا من شأنه أن يقلل من أمن البرنامج.

و قد وفرت شركة مايكروسوفت طريقة جديدة لتوليد الأرقام عن طريق استخدام دالة الـ RNGCryptoServiceProvider و ذلك لتوليد أرقام بطريقة آمنة. و الكود أدناه يوضخ طريقة الاستخدام.

كود PHP:

public int GetRandom(int min, int max) 

{ 

Random rnd = null; 

RNGCryptoServiceProvider rand = new RNGCryptoServiceProvider(); 

// To fill Random number into. 

byte[] r = new byte[10]; 

rand.GetBytes(r); 

rnd = new Random(BitConverter.ToInt32(r, 0)); 

return rnd.Next(min, max); 

} 


و لا ننسى أن ندرج المكتبة System.Security.Cryptography باستخدام الأمر using .

و الكود أعلاه يقوم بتوليد رقم عشوائي محدود بـ Max و Min و يمكن تعديل الكود ليكون بدون حد أكبر و أدنا.

[Mohamed Oraby]

جزاك الله كل خير