Παραγωγή τυχαίου αριθμού-Πρόβλημα

[parara]

Γεια σας και Χρόνια Πολλά,

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

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

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

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

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

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

[vraxnakisg]

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

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

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

[parara]

Καλησπέρα,

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

[vraxnakisg]

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

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