VB 2005 - Random number generator

#1
..:: CLAW ::..

Posted 03 March 2007 - 22:07

Junior Member

Grup: Members
Posts: 51
Înscris: 16.12.2006

Fiind incepator in Visual Basic, incerc sa testez diferite lucruri pentru a le invata (consider ca asa se invata cel mai usor). Astfel am intalnit o problema: incercand sa fac un mic generator de numere ( dupa ce am cautat pe Internet informatii) am ajuns la codul acesta:

Private Sub btn_generate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_generate.Click
Randomize(9)
TextBox1.Text = Int(1 * Rnd())
End Sub

Numai ca numarul generat este intotdeauna 0. Imi puteti explica va rog unde am gresit si ce trebuie sa fac?
Multumesc anticipat.

Back to top

#2
teddycarebears

Posted 04 March 2007 - 04:27

Member

Grup: Members
Posts: 247
Înscris: 18.02.2003

http://www.vbexplore...m_numbers_1.asp

Back to top

#3
queensoft

Posted 04 March 2007 - 13:33

Trust no one

Grup: Banned
Posts: 16,079
Înscris: 26.11.2005

TextBox1.Text = Int(1 * Rnd(123))
Trebuie sa scrii rnd(x), unde X>1
De fapt, nu ai help ?!
Pui cursorul pe functia RND si apesi F1.
Uite, ai invatat 2 lucruri dintr-un foc !!!

Back to top

#4
teddycarebears

Posted 04 March 2007 - 22:02

Member

Grup: Members
Posts: 247
Înscris: 18.02.2003

in linkul care l-am dat scrie acolo ca rnd e o chestie misto DAR e intre 0 si 1 .... in felul asta se explica si motivul pentru care el primeste intr-una 0 ...

Back to top

#5
xa3RO18

Posted 04 March 2007 - 22:58

Junior Member

Grup: Members
Posts: 154
Înscris: 15.01.2007

Radomize(9) initializeaza generatorul de numere aleatoare cu 9. Cum acesta se reinitializeaza la fiecare apel, functia va returna de fiecare data aceeasi valoare, adica 0, in acest caz. Sper ca nu gresesc... :huh:

Back to top

Anunturi

Chirurgia cranio-cerebrală minim invazivă

Tehnicile minim invazive impun utilizarea unei tehnologii ultramoderne.

Endoscoapele operatorii de diverse tipuri, microscopul operator dedicat, neuronavigația, neuroelectrofiziologia, tehnicile avansate de anestezie, chirurgia cu pacientul treaz reprezintă armamentarium fără de care neurochirurgia prin "gaura cheii" nu ar fi posibilă. Folosind tehnicile de mai sus, tratăm un spectru larg de patologii cranio-cerebrale.

www.neurohope.ro

VB 2005 - Random number generator

#1 ..:: CLAW ::.. Posted 03 March 2007 - 22:07

#2 teddycarebears Posted 04 March 2007 - 04:27

#3 queensoft Posted 04 March 2007 - 13:33

#4 teddycarebears Posted 04 March 2007 - 22:02

#5 xa3RO18 Posted 04 March 2007 - 22:58