Επιστρέφει μια τιμή Απλής ακρίβειας η οποία περιέχει έναν τυχαίο αριθμό.
Σύνταξη
Rnd[(αριθμός)]
Ο προαιρετικός αριθμόςόρισμα είναι Μονός ή οποιοσδήποτε έγκυρος αριθμητική παράσταση.
Τιμές επιστροφής
|
Εάν το όρισμα αριθμός είναι |
Το Rnd δημιουργεί |
|
Μικρότερο του μηδενός |
Ο ίδιος αριθμός κάθε φορά, χρησιμοποιώντας τον αριθμό ως φύτρο. |
|
Μεγαλύτερο από το μηδέν |
Ο επόμενος τυχαίος αριθμός στην ακολουθία. |
|
Ίσο με το μηδέν |
Ο αριθμός που δημιουργήθηκε πιο πρόσφατα. |
|
Δεν παρέχεται |
Ο επόμενος τυχαίος αριθμός στην ακολουθία. |
Παρατηρήσεις
Η συνάρτηση Rnd επιστρέφει μια τιμή μικρότερη από 1 αλλά μεγαλύτερη ή ίση με το μηδέν.
Η τιμή του αριθμού καθορίζει τον τρόπο με τον οποίο η συνάρτηση Rnd δημιουργεί έναν τυχαίο αριθμό:
Για κάθε δεδομένο αρχικό σπόρο, δημιουργείται η ίδια ακολουθία αριθμών, επειδή κάθε διαδοχική κλήση στη συνάρτηση Rnd χρησιμοποιεί τον προηγούμενο αριθμό ως σπόρο για τον επόμενο αριθμό στη σειρά.
Πριν καλέσετε τη συνάρτηση Rnd, χρησιμοποιήστε την πρόταση Randomize χωρίς κάποιο όρισμα για να αρχικοποιήσετε τη γεννήτρια τυχαίων αριθμών με έναν σπόρο που βασίζεται στο χρονοδιακόπτη του συστήματος.
Για να παράγετε τυχαίους ακέραιους σε μια δεδομένη περιοχή, χρησιμοποιήστε αυτόν τον τύπο:
Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
Εδώ, ο ανώτερος αριθμός είναι ο μεγαλύτερος αριθμός στην περιοχή και ο μικρότερος είναι ο μικρότερος αριθμός στην περιοχή.
Σημείωση: Για να επαναλάβετε ακολουθίες τυχαίων αριθμών, καλέστε τη συνάρτηση Rnd με ένα αρνητικό όρισμα αμέσως πριν χρησιμοποιήσετε την Τυχαιοποίηση με ένα αριθμητικό όρισμα. Η χρήση της συνάρτησης Randomize με την ίδια τιμή για τον αριθμό δεν επαναλαμβάνει την προηγούμενη ακολουθία.
Παράδειγμα ερωτήματος
|
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)
