ÖLÜYÜM
Süper Moderator
Gerekli Olanlar :
-1- Adet Label
-1- Adet Timer [ Timer'ın Enabled'ini True Yapın ]
Timer'a Girilecek Kod :
r = Int(Rnd() * 256)
g = Int(Rnd() * 256)
b = Int(Rnd() * 256)
Label1.ForeColor = Color.FromArgb(r, g, b)
Public Class Form1 İn Hemen Altına Yazılacak Kod :
Dim r, g, b As Integer
-1- Adet Label
-1- Adet Timer [ Timer'ın Enabled'ini True Yapın ]
Timer'a Girilecek Kod :
r = Int(Rnd() * 256)
g = Int(Rnd() * 256)
b = Int(Rnd() * 256)
Label1.ForeColor = Color.FromArgb(r, g, b)
Public Class Form1 İn Hemen Altına Yazılacak Kod :
Dim r, g, b As Integer
