Skip to main content

AccessTr.neT


Animasyonlu Form Acilisi

chopper07
chopper07
1
3058

Animasyonlu Form Acilisi

#1
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-
-*-*..............................................................................*-*-
-*-*.......................C o d e d b y U c a r.........................*-*-
-*-*..............................................................................*-*-
-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-

Formumuza bir adet Timer Koyalim ve asagidaki kodları ekleyelim

Kod:
Private Sub Timer1_Timer( )

Dim ilkyukseklik, sonyukseklik, ilkgenislik, songenislik
ilkyukseklik = 510
sonyukseklik = 6405
ilkgenislik = 1845
songenislik = 6840

Form1.Width = ilkgenislik
Form1.Height = ilkyukseklik

For y = ilkyukseklik To sonyukseklik
Form1.Height = y

If y = sonyukseklik Then

For g = ilkgenizlik To songenislik
Form1.Width = g

If g = songenislik Then
Timer1.Enabled = False
End If

Next

End If

Next


End Sub

Hepsi bu kadar şimdi F5 tusu ile form animasyonumuzu test edebiliriz..
™Hiç Birimiz, Hepimiz Kadar Akıllı Olamayız...®

Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Animasyonlu Form Acilisi - Yazar: chopper07 - 25/11/2008, 17:58
Cvp: Animasyonlu Form Acilisi - Yazar: fomka - 26/11/2008, 10:12
Task