|
|
|
Sayısal Loto Proğramı
6 adet Textbox 1 adet buton ekliyoruz
Form Load ' a Randomize yazıp
buttonun içinede şu kodları yazıyoruz;
++++++++++++++++++++++++++++++
Textbox1.Text=Int((Rnd()*48)+1)
Textbox2.Text=Int((Rnd()*48)+1)
Textbox3.Text=Int((Rnd()*48)+1)
Textbox4.Text=Int((Rnd()*48)+1)
Textbox5.Text=Int((Rnd()*48)+1)
Textbox6.Text=Int((Rnd()*48+1)
|
|
|
|
|
|
|