Επιστρέφει μια τιμή Απλής ακρίβειας η οποία περιέχει έναν τυχαίο αριθμό.
Σύνταξη
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)