VisualBasicben több véletlenszámot?
Egy olyan segítség kellene nekem a VB-ben, hogy több véletlenszámot hogyan tudok úgymond létrehozni? Addig megvan, hogy 2 random, de azok mindig ugyanazt az értéket kapják.
Dim rnd1, rnd2 As Random
Dim ran1, ran2 As Byte
rnd1 = New Random
rnd2 = New Random
ran1 = rnd1.Next(1, 7)
ran2 = rnd2.Next(1, 7)
Így működik?
Dim rnd1, rnd2 As Random
Dim ran1, ran2 As Byte
rnd1 = New Random
ran1 = rnd1.Next(1, 7)
rnd2 = New Random
ran2 = rnd2.Next(1, 7)
NEM kell 2 Random, nem így működik. A Random egy osztály, aminek a Next függvénye ad egy új, véletlen értéket. Ráadásul inicializálni is kéne, nem tudom, mi rá a függvény (Randomize talán...).
A kód helyesen:
Dim rnd As Random
Dim ran1, ran2 As Byte
rnd=New Random
'Itt kéne inicializálni
ran1=rnd.Next(1, 7)
ran2=rnd.Next(1, 7)
Köszönöm zsomkovacs-nak a választ. Így mostmár működik is :)
Dim rnd As Random
Dim ran1, ran2 As Byte
rnd = New Random
ran1 = rnd.Next(1, 7)
ran2 = rnd.Next(1, 7)
További kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!