You need to enable JavaScript to run this app.

Skip to main content

Pir Zöhre Ana Forum

Shape – Timer - Vscrollbar

Shape – Timer - Vscrollbar

#1
PELİN
Posting Freak
Avatar: PELİN
Shape – Timer - Vscrollbar
Private Sub Form_Load()
Shape1.BorderStyle = 1
Shape1.BorderWidth = 5 'çizgi kalınlığı 5
Timer1.Interval = 1000
VScroll1.Min = 0
VScroll1.Max = 5
End Sub
Private Sub Timer1_Timer()
VScroll1.Value = VScroll1.Value + 1
'tüm şekiller gösterldi ise baştan itibaren devam et
If VScroll1.Value >= 5 Then VScroll1.Value = 0
End Sub
Private Sub VScroll1_Change()
Shape1.Shape = VScroll1.Value
End Sub

Private Sub Form_Load()
Shape1.BorderStyle = 1
Shape1.BorderWidth = 5 'çizgi kalınlığı 5
Timer1.Interval = 1000
VScroll1.Min = 0
VScroll1.Max = 5
End Sub
Private Sub Timer1_Timer()
VScroll1.Value = VScroll1.Value + 1
'tüm şekiller gösterldi ise baştan itibaren devam et
If VScroll1.Value >= 5 Then VScroll1.Value = 0
End Sub
Private Sub VScroll1_Change()
Shape1.Shape = VScroll1.Value
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.