You need to enable JavaScript to run this app.

Skip to main content

Pir Zöhre Ana Forum

Titrerken Renk Değiştiren Program

Titrerken Renk Değiştiren Program

#1
PELİN
Posting Freak
Avatar: PELİN
Titrerken Renk Değiştiren Program
formunuzun load, mouse move ve unload bolumlerine aşağıdaki kodu ekleyip forecolor ozelliğini siyah, border style ozelliğinide 4 yapın
Dim i As Integer
For i = 0 To 1000
Form1.Top = Form1.Top + 50
If Form1.Top > 1000 Then
Form1.Top = 100
Form1.Left = Form1.Left + 50
ElseIf Form1.Left > 3000 Then
Form1.Left = Form1.Left - 1000
End If

Next i
If Form1.BackColor = &HFFFF& Then
Form1.BackColor = &HFF00&
ElseIf Form1.BackColor = &HFF00& Then
Form1.BackColor = &HFF&
ElseIf Form1.BackColor = &HFF& Then
Form1.BackColor = &H404040
ElseIf Form1.BackColor = &H404040 Then
Form1.BackColor = &HFFFF&
End If
End Sub
[Resim: 114ld.jpg]



Ben göremem daha uzun boyunu
Ahret derler kısaltamam yolunu
Bugün Sahı Merdan sarsın oglunu
Yetis Ya Üseyin baban gidiyo
Cevapla

İçerik sağlayıcı paylaşım sitesi olarak hizmet veren Pir Zöhre Ana Forum sitemizde 5651 sayılı kanunun 8. maddesine ve T.C.K'nın 125. maddesine göre tüm üyelerimiz yaptıkları paylaşımlardan kendileri sorumludur. Sitemiz hakkında yapılacak tüm hukuksal şikayetleri İletişim bağlantısından bize ulaşıldıktan en geç 3 (üç) gün içerisinde ilgili kanunlar ve yönetmenlikler çerçevesinde tarafımızca incelenerek, gereken işlemler yapılacak ve site yöneticilerimiz tarafından bilgi verilecektir.