Forum

Forum (https://www.ms-office.gr/forum/)
-   Access - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/)
-   -   Παραγωγή τυχαίου αριθμού-Πρόβλημα (https://www.ms-office.gr/forum/access-erotiseis-apantiseis/4165-paragogi-tyxaioy-arithmoi-problima.html)

parara 05-05-16 22:45

Παραγωγή τυχαίου αριθμού-Πρόβλημα
 
Γεια σας και Χρόνια Πολλά,

χρησιμοποιώ την

MyValue = Int((10001 * Rnd) + 4)

για να κάνω παραγωγή ενός τυχαίου 4-ψήφιου αριθμού.

Οσο δουλεύω μέσα στην βάση, δουλεύει σωστά δηλαδή παράγει τυχαία ένα αριθμό 4-ψήφιο.
Μόλις βγω από την access και ξαναμπώ, παράγει πάλι τον πρώτο αριθμό, σαν να κάνει δηλαδή επανάληψη.

Μήπως ξέρει κανείς το γιατί;
Το ίδιο κάνει και η εντολή
MyValue = 1000 + Int(9000 * Rnd)

Ευχαριστώ!
Διονύσης

vraxnakisg 06-05-16 12:04

Γεια και χρόνια πολλά

πριν την εντολή
MyValue = Int((10001 * Rnd) + 4)
πρόσθεσε την συνάρτηση Randomize
δηλαδή ο κώδικας σου θα είναι

Randomize
MyValue = Int((10001 * Rnd) + 4)

parara 06-05-16 16:40

Καλησπέρα,

Ευχαριστώ, το πρόβλημα διορθώθηκε, και για να μαθαίνουμε γιατι χρειάζεται η randomize αφού μέσα στην εντολή δεν παράγεται ο αριθμός με την χρήση της Rnd

vraxnakisg 06-05-16 18:02

Για δες το παρακάτω:

https://msdn.microsoft.com/en-us/lib...(v=vs.90).aspx


Η ώρα είναι 13:01.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2