הפונקציה Rnd

חשוב: מאמר זה תורגם בתרגום מכונה, ראה כתב ויתור. תוכל למצוא את הגרסה באנגלית של המאמר כאן לעיונך.

החזרת יחיד המכיל מספר אקראי.

תחביר

הפונקציה Rnd [(number)]

באופן אופציונלי, מספרארגומנט הוא יחיד או כל חוקי ביטוי מספרי.

מחזירות ערכים

אם number הוא

הפונקציה Rnd יוצר

קטן מאפס

מספר זהה בכל פעם, תוך שימוש במספר בתור זרע.

גדול מאפס

המספר האקראי הבא ברצף.

שווה לאפס

המספר האחרון שנוצר.

לא סופק

המספר האקראי הבא ברצף.


הערות

הפונקציה Rnd מחזירה ערך קטן מ- 1 אבל גדול או שווה לאפס.

הערך של number קובע כיצד הפונקציה Rnd יוצרת מספר אקראי:

עבור כל מקור התחלתי נתון נוצר אותו רצף מספרים, מכיוון שכל קריאה לפונקציה Rnd משתמשת במספר הקודם כמקור עבור המספר הבא ברצף.

לפני קריאה Rnd, השתמש במשפט אקראי ללא ארגומנט כדי לאתחל את מחולל מספר אקראי באמצעות מקור המבוסס על שעון התזמון של המערכת.

כדי ליצור מספרים שלמים אקראיים בטווח נתון, השתמש בנוסחה זו:

Int((upperbound - lowerbound + 1) * Rnd + lowerbound)

כאן, upperbound הוא המספר הגדול ביותר בטווח, והוא lowerbound המספר הקטן ביותר בטווח.

הערה: כדי לחזור על רצף של מספרים אקראיים, התקשר Rnd עם ארגומנט שלילי מייד לפני השימוש אקראי עם ארגומנט מספרי. שימוש אקראי עם אותו ערך עבור מספר תחזור הרצף הקודם.

דוגמה

הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications‏ (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.

דוגמה זו משתמשת בפונקציה Rnd כדי להפיק מספר שלם אקראי בין 1 ל- 6.

Dim MyValue
' Generate random value between 1 and 6.
MyValue = Int((6 * Rnd) + 1)

הערה: כתב ויתור בנוגע לתרגום מכונה: מאמר זה תורגם על-ידי מערכת מחשב, ללא התערבות אדם. Microsoft מציעה את תרגומי המכונה כדי לסייע למשתמשים שאינם דוברי אנגלית ליהנות מתוכן בנושא מוצרים, שירותים וטכנולוגיות של Microsoft. מכיוון שהמאמר תורגם על-ידי מכונה, הוא עלול להכיל שגיאות באוצר המילים, בתחביר או בדקדוק.

הרחב את הכישורים שלך
סייר בהדרכה
קבל תכונות חדשות לפני כולם
הצטרף למשתתפי Office Insider

האם מידע זה היה שימושי?

תודה על המשוב!

תודה על המשוב! נראה שכדאי לקשר אותך לאחד מנציגי התמיכה של Office.

×