Loading...

12 Mayıs 2007 Cumartesi

Rasgele Sayılar | VB

VB de örneğin istediğinizde rasgele sayı üretmek istiyorsanız.Aşağıdaki kodlara bakabilirsiniz...

Önce dediğim gibi formunuza bir command ve bir de label ekleyin sonra command1.click kodu olarak bunları yazın

Private Sub Command1_Click()
Label1 = Int(Rnd * 10)
End Sub


Arkadaşlar işte kodumuz bu yalnız bir iki açıklama yapmak istiyorum

kodu yazarken önce sayının nerde belirmesini istiyorsanız onu yazın(Ör: Label1 yada bu bir değişkende olabilir) arkasından eşittir koyup "int" yazın bu komut 0-1 arasında bir sayı üretir

sonra parantez açıpta rnd(random) yazdığınızda VB o 0-1 arasındaki üretilen sayılardan birini alır sonrada sizin "*" işareti koyup yazdığınız rakamla çarpıp onu size verir bu rakam aynı zamanda sizin ürettirmek istediğiniz sayıların sınırıdır(Örnek için 10 yazdık bu demektir ki v.b. 0,1,2,3,4,5,6,7,8,9 sayılarından birini üreticek eğer 50 yazsaydık 1,2,3,4,5........47,48,49 sayılarından birini üretecekti).

Hiç yorum yok:

 
eXTReMe Tracker
Sayfa Bloggoayrılık yazılarıoyunlarkurye web tasarımı broşürlük dizi izle dizi izleKombi Tesisat Radyo DinleChat paysafe paysafe kartSohbet arkadaş travestitravesti travesti travesti