Programınızın Arka Planı Sürekli Değişsin...

04/11/2010, 15:04

gitarc

Burada ekleyeceğimiz 2 şey var = 1 Command button 1 Timer

Eğer bunun direk başlamasını istiyorsak buttondaki kodları form a yazarak yapabiliriz .. İşte Kodlar :

######

Private Sub Command1_Click()
Timer1.Enabled = True

End Sub

Private Sub Timer1_Timer()
Dim i As String
i = Rnd * 100000
Form1.BackColor = i
End Sub
04/11/2010, 16:50

C*e*l*o*y*c*e

sayın gitarc
bu bilgiler için ayrı ayrı teşekküler
keşke örnekleri ekleseydin daha iyi olurdu kolay gelsin
04/11/2010, 19:47

rfve

evet bende takip ediyorum
ama örnek olsa daha iyi olurdu...
05/11/2010, 00:31

ogulcan92

Sn:gitarc
Paylaşım için teşekkürler.
Aşağıdaki kodlarıda formun loadına ekleyiniz.
Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = False
End Sub
Arkadaş örnek kodları dersler bölümünde verdiğine göre örneğe gerek yok diye düşünüyorum dersler bölümündeki kodlardan yararlanılarak birşeyler yaparak öğrenmek daha iyi olur.