Anasayfa > Kodlar > Visual Basic ile sayısal loto

Visual Basic ile sayısal loto


Forma sadece 1 frame ve 6  tane label ekleyin ve command butona kodalrı yazın

Private Sub Command1_Click()
Label8.Caption = Int(Rnd * 49) + 1
Label9.Caption = Int(Rnd * 49) + 1
Label10.Caption = Int(Rnd * 49) + 1
Label11.Caption = Int(Rnd * 49) + 1

 


Label12.Caption = Int(Rnd * 49) + 1
Label13.Caption = Int(Rnd * 49) + 1
End Sub

  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: