[es] - Faktor slucajnost

OTOK@
Bosna

Član broj: 25553
Poruke: 135
*.as54.bi.bih.net.ba.

ICQ: 245503512

Profil

^{11.06.2004. u 23:20}

Evo da bi lakse objasnio navest cu jedan bezvezan primjer:
Kako da npr. kad kliknem na dugme Command1
da mi od tri ponuđene poruke otvori jednu po principu slucajnosti
1.Msgbox "bla bla bla 1"
2.Msgbox "bla bla bla 2"
3.Msgbox "bla bla bla 3"

Gledao sam ovo vec jednom ovdje na forumu ali nisam mogao naci pravi thread sa codom...

^{● Kakvu zenu imam, bolje da je nemam... ●}

^{11.06.2004. u 23:20}

Marko_L
Marko Lošonc
Founder and Owner, Jurassic Software
Beograd

Moderator
Član broj: 20532
Poruke: 2219
*.yubc.net

Jabber: Marko_L@elitesecurity.org
ICQ: 249407402
Sajt: www.jurassicsoftware.com

Profil

Re: Faktor slucajnost

^{12.06.2004. u 16:26}

@Radudzoni, malo si pobrk'o lončiće :) Kad sam zadnji put gledao ovo je bio VB forum :)

Citat:

Kako da npr. kad kliknem na dugme Command1
da mi od tri ponuđene poruke otvori jednu po principu slucajnosti
1.Msgbox "bla bla bla 1"
2.Msgbox "bla bla bla 2"
3.Msgbox "bla bla bla 3"

Code:
Private Sub Command1_Click()
Dim a As Integer
Randomize Timer
a = Int(3 * Rnd)
If a = 0 Then MsgBox "bla bla bla 1"
If a = 1 Then MsgBox "bla bla bla 2"
If a = 2 Then MsgBox "bla bla bla 3"
End Sub

-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca m.
-Piše "Insert disk 3", a jedva sam i ova dva ugurao u drajv
-Postoje samo dve osobe kojima verujem, jedna sam ja, a druga nisi ti

^{12.06.2004. u 16:26}

OTOK@
Bosna

Član broj: 25553
Poruke: 135
*.as54.bi.bih.net.ba.

ICQ: 245503512

Profil

Re: Faktor slucajnost

^{13.06.2004. u 10:43}

Hehhee...hvala vam na odgovoru!

^{● Kakvu zenu imam, bolje da je nemam... ●}

^{13.06.2004. u 10:43}

X-Cite
Goran Tadić
Mediacija, Tuštelekom
Ljubljana

Član broj: 28706
Poruke: 625
*.dsl.siol.net

ICQ: 311920553
Sajt: www.baza-ukradenih-gsm.co..

Profil

Re: Faktor slucajnost

^{21.06.2004. u 10:20}

@Marko_L

Zanima me nesto... taj Random koji si koristio
ja sam ga stavio u neki kao racunski slucaj da izbaci po
svom izboru broj... i kad sam god startovao on mi je izbacio uvjek
iste brojeve po istom redu i sve... dali je to samo kod
mene ili i kod vas? i dali za to postoji neko rjesenje da koristi
npr timer randomize kao sto sam cuo da ima c++ ?

Pozdrav
GoGy

^{21.06.2004. u 10:20}

vujkev
Darko Vujičić
Telekom Srbija AD
Beograd

Član broj: 8072
Poruke: 878
*.telekom.yu

Profil

Re: Faktor slucajnost

^{21.06.2004. u 11:39}

Kao random broj mozes da koristis i GetTickCount. To je brojac koji se startuje od paljenja racunara i meri vreme rada u milisekundama.

Naučio sam...
Da je važnije biti ljubazan nego biti u pravu

^{21.06.2004. u 11:39}

X-Cite
Goran Tadić
Mediacija, Tuštelekom
Ljubljana

Član broj: 28706
Poruke: 625
*.dsl.siol.net

ICQ: 311920553
Sajt: www.baza-ukradenih-gsm.co..

Profil

Re: Faktor slucajnost

^{21.06.2004. u 12:05}

@vujkev

dali to vazi za Visual Basic?

Pozdrav
GoGy

^{21.06.2004. u 12:05}

mladenovicz
Zeljko Mladenovic
Xoran Technologies, Inc., Ann Arbor, MI, USA / Softwa..
Ann Arbor, MI, USA

Moderator
Član broj: 6598
Poruke: 2064
*.bg.wifi.vline.verat.net.

Jabber: mladenovicz@elitesecurity.org
ICQ: 95144142
Sajt: yubc.net/~mz

Profil

Re: Faktor slucajnost

^{21.06.2004. u 12:15}

Da, to vazi i za VB. GetTickCount je API funkcija.

Code:

Private Declare Function GetTickCount& Lib "kernel32" ()
Private Sub Form_Load()
ret& = GetTickCount&
MsgBox Str$(ret& / 60000) + " minutes."
End Sub

Blue Man Group

^{21.06.2004. u 12:15}

vujkev
Darko Vujičić
Telekom Srbija AD
Beograd

Član broj: 8072
Poruke: 878
*.telekom.yu

Profil

Re: Faktor slucajnost

^{21.06.2004. u 12:18}

Naravno.

Code:

Private Declare Function GetTickCount Lib "kernel32" () As Long

i posle samo pozivas funkciju

Code:

broj = GetTickCount

Naučio sam...
Da je važnije biti ljubazan nego biti u pravu

^{21.06.2004. u 12:18}

degojs

Član broj: 4716
Poruke: 5096
*.cpe.net.cable.rogers.com

Sajt: www.novetehnologije.com

Profil

Re: Faktor slucajnost

^{21.06.2004. u 12:47}

@X-Cite:

Primeti da u kodu koji si dobio postoji i ona linija sa
Randomize Timer
koja ce spreciti ponavljanje..

Commercial-Free !!!

^{21.06.2004. u 12:47}

X-Cite
Goran Tadić
Mediacija, Tuštelekom
Ljubljana

Član broj: 28706
Poruke: 625
*.dsl.siol.net

ICQ: 311920553
Sajt: www.baza-ukradenih-gsm.co..

Profil

Re: Faktor slucajnost

^{22.06.2004. u 11:58}

hvala momci ;)

Pozdrav
GoGy

^{22.06.2004. u 11:58}

markom
Marko Milivojević
Senior Network Expert, Vodafone
64°08´N - 21°56´W

Administrator
Član broj: 18427
Poruke: 4109
*.lina.net

Jabber: markom@elitesecurity.org
ICQ: 2354227
Sajt: markom.info

Profil

Re: Faktor slucajnost

^{22.06.2004. u 12:22}

Ja bih samo dodao, nevezano za Visual Basic, da ovakav tip randomizera ne koristiš ni za šta oybiljno, pošto su u pitanju (veoma slabi) pseudorandom brojevi.

Ukoliko želiš da generišeš prave slučajne brojeve, morao bi da nabaviš hardverski generator.

Marko.

Moj Network Blog

OV SM
LA PK

^{22.06.2004. u 12:22}