Resimin timer ile kullanımı

accessman

Access Cevaplanmış Soruları

2109

06/04/2012, 15:54 #3

Aktif Üye

accessman

Bul

Aktif Üye

Adı Soyadı:

Konum: Denizli

Ofis Versiyonu: Ofis 2003

Son Oturumu: 12/01/2021,20:07

Yorumları: 4.395

Konuları: 900

Kayıt Tarihi: 31/10/2008

Teşekkür Puanı: 434

teşekkürler
tam istediğim gibi olmuş

Kod:

Private Sub Form_Timer()

Dim say As Integer

If Me.Resim1.Visible = True Then Me.Resim1.Visible = False: Me.Resim2.Visible = True: Exit Sub

If Me.Resim2.Visible = True Then Me.Resim2.Visible = False: Me.Resim3.Visible = True: Exit Sub

If Me.Resim3.Visible = True Then Me.Resim3.Visible = False: Me.Resim4.Visible = True: Exit Sub

If Me.Resim4.Visible = True Then Me.Resim4.Visible = False: Me.Resim1.Visible = True: Exit Sub

End Sub

bu kod yapısı hiç aklıma gelmemişti
pratik çözüm
ama daha fazla resim olursa nasıl yapılabilir

@benbendedeilem

Son Düzenleme: 06/04/2012, 15:57, Düzenleyen: accessman.

Cevapla