החזרת יחיד המכיל מספר אקראי.
תחביר
Rnd[(number)]
המספר האופציונליארגומנט בודד או כל ערך חוקי ביטוי מספרי.
ערכי החזרה
אם number הוא |
Rnd יוצר |
קטן מאפס |
אותו מספר בכל פעם, תוך שימוש במספרזרע. |
גדול מאפס |
המספר האקראי הבא ברצף. |
שווה לאפס |
המספר האחרון שנוצר. |
לא סופו |
המספר האקראי הבא ברצף. |
הערות
הפונקציה Rnd מחזירה ערך קטן מ- 1 אך גדול או שווה לאפס.
ערך המספר קובע כיצד Rnd יוצר מספר אקראי:
עבור כל רצף ראשוני נתון, אותו רצף מספרים נוצר מכיוון שכל קריאה עוקבת לפונקציית Rnd משתמשת במספר הקודם כמקור עבור המספר הבא ברצף.
לפני קריאה ל- Rnd, השתמש במשפט Randomize ללא ארגומנט כדי לאתחל את מחולל המספרים האקראיים עם Seed בהתבסס על שעון העצר של המערכת.
כדי להפיק מספרים שלמים אקראיים בטווח נתון, השתמש בנוסחה זו:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
כאן, upperbound הוא המספר הגבוה ביותר בטווח, והערך הנמוך ביותר הוא המספר הנמוך ביותר בטווח.
הערה: כדי לחזור על רצפים של מספרים אקראיים, קרא ל- Rnd עם ארגומנט שלילי מיד לפני השימוש בפונקציה Randomize עם ארגומנט מספרי. שימוש ב- Randomize עם אותו ערך עבור number אינו חוזר על הרצף הקודם.
דוגמה לשאילתה
Expression |
תוצאות |
SELECT ProductSales.ProductID, Rnd([Discount]) AS RandomNumbers FROM ProductSales; |
הפונקציה מחזירה את מזהה המוצר יחד עם מספרים אקראיים בעמודה RandomNumbers. |
דוגמה ל- VBA
הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.
דוגמה זו משתמשת בפונקציה Rnd כדי ליצור ערך של מספר שלם אקראי מ- 1 עד 6.
Dim MyValue
' Generate random value between 1 and 6. MyValue = Int((6 * Rnd) + 1)