Kamis, 01 April 2010

Label Kerlap-Kerlip

Buat Form baru dengan sebuah Label dan sebuah Timer (Enabled=True; Interval=100).

Di bagian kontrol Timer-nya ketikkan :
Label1.Visible = Not Label1.Visible

Atau anda bisa ketikkan :
[ VB 6.0 ]
Randomize
Label1.ForeColor = RGB(Rnd * 255, Rnd * 255, Rnd * 255)
[ VB .NET ]
Randomize()
Label1.ForeColor = ColorTranslator.FromOle(RGB(Rnd() * 255, Rnd() * 255, Rnd() * 255))

Label: , , ,

0 Komentar:

Posting Komentar

Pengunjung yang baik selalu meninggalkan jejak berupa komentar. :)

Berlangganan Posting Komentar [Atom]

<< Beranda