دليل استخدام إجراءات VBAppAss.dll للمبرمجين بلغة Visual Basic 6.0

الدالة GetRandomNumber

الحصول على عدد صحيح عشوائي ضمن نطاق محدد.

الصيغة:

Function GetRandomNumber(LowerLimit As Long, UpperLimit As Long) As Long

الصنف:
TNumber.

الوسائط (Parameters):

الشرح:
تقوم هذه الدالة بالحصول على عدد عشوائي صحيح تتراوح قيمته بين LowerLimit و UpperLimit.

الاستخدام:

Dim ObjNumber As New TNumber
Dim Index As Long

Index = ObjNumber.GetRandomNumber(11, 100)

بداية الصفحة