Visual Basic véletlenszerű számok?
Több (de itt most csak legyen kettő), számot szeretnék véletlenszerűen
generálni két külön TextBoxba, de úgy, hogy a számok soha ne egyezzenek
meg.
Hogyan tudnám egy ilyen argumentnek megfeleltetni?
A random számgenerálást így csináltam:
ELSŐ SZÁM:
Dim rndnumber As Random
Dim number As Integer
rndnumber = New Random
number = rndnumber.next(1,9)
Textbox1.text=number.ToString
MÁSODIK SZÁM:
Dim rndnumber2 As Random
Dim number2 As Integer
rndnumber2 = New Random
number2 = rndnumber2.next(1,9)
Textbox2.text=number.tostring
válasza:ELSŐ SZÁM GENERÁLÁSA
ciklus (
MÁSODIK SZÁM GENERÁLÁSA
) amíg (number=number2)
Ha nem sikerült érthetőre megnézem a szintaktikát is.
válasza:'elso szam
Dim rndnumber As Random
Dim number As Integer
rndnumber = New Random
number = rndnumber.next(1,9)
Textbox1.text=number.ToString
'masodik szam
Do
Dim rndnumber2 As Random
Dim number2 As Integer
rndnumber2 = New Random
number2 = rndnumber2.next(1,9)
Loop While (number = number2)
Textbox2.text=number.tostring
Ha külön akarod generálni a számokat, a hátultesztetős ciklus-részt az elsőhöz is be kell másolni.
(a kódot nem teszteltem.)
Kapcsolódó 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!