"nOAz" <n0Az@hotmail.com> skrev i en meddelelse
news:ajm6gh$1ci5u4$1@ID-134837.news.dfncis.de...
> hvorfor virker min rnd ikke korrekt...
> hver gang jeg starter programmet og klikker på knappen
> vælger den tallene i samme rækkefølge som sidst...
>
> Private Sub Command1_Click()
> R = Int(Rnd * 17)
> Label1.Caption = R
> End Sub
Husk Randomize før Rnd:
Fra Help:
If Randomize is not used, the Rnd function (with no arguments) uses the same
number as a seed the first time it is called, and thereafter uses the last
generated number as a seed value.
M.a.o. for at få en ny række tilfældige tal hver gang, skal Randomize fyres
af før Rnd.
--
mvh
Jens Vestergaard
www.railsoft.dk
--------
Indsæt v før snablen