
24-03-16, 22:46
|
| Όνομα: ΔΙΟΝΥΣΟΣ Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 31-12-2012
Μηνύματα: 66
| |
Για την παραγωγή 4-ψήφιου τυχαίου αριθμού χρησιμοποίησα τον παρακάτω κώδικα, για όποιον ενδιαφέρεται
Dim MyValue
MyValue = Int((10000 * Rnd) + 1)
για το δεύτερο κομάτι του ερωτήματος δεν βρήκα ακόμη κάποια λύση
|