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