Aday
WM Aracı
Kullanıcı
-
Üyelik
26.03.2014
-
Yaş/Cinsiyet
62 / E
-
Meslek
İnş. Müh.
-
Konum
İstanbul Anadolu
-
Ad Soyad
A** Y**
-
Mesajlar
11
-
Beğeniler
0 / 1
-
Ticaret
0, (%0)
Programın başına 10 sn'lik bir animasyon (gif dosyası) ekledim. Gif'i; açmış olduğum yeni bir form üzerine, aynı ebadda eklemiş olduğum bir picturebox'un image'sine yükleyerek çalıştırıyorum.
Form1'in Form1_Load prosedürüne
Me.Hide()
Form2.Show()
yazarak gönderiyorum.
Form2'nin Form2_Load prosedürüne ise
Me.Show()
Form1.Show()
yazdım.
Program başladığında form2'ye gidip gifi çalıştırıyor ancak gif başa sarıp yeniden dönüyor. Böylece sonsuz bir döngüde devam ediyor.
Form2'deki bu gif'i sadece 1 kez sonuna kadar çalıştırdıktan sonra, Form2'yi kapattırıp, Form1'e nasıl döndürebilirim ?
yakupqqq
Kimlik Onayı Bekliyor
Banlı Kullanıcı
-
Üyelik
25.10.2014
-
Yaş/Cinsiyet
33 / E
-
Meslek
üniversite öğrencisi
-
Konum
İstanbul Anadolu
-
Ad Soyad
Y** K**
-
Mesajlar
963
-
Beğeniler
33 / 285
-
Ticaret
11, (%100)
timer ekle, interval 1000. ve sayi değişkeni
sayi=0;
if (sayi=10)
me.close
Aday
WM Aracı
Kullanıcı
-
Üyelik
26.03.2014
-
Yaş/Cinsiyet
62 / E
-
Meslek
İnş. Müh.
-
Konum
İstanbul Anadolu
-
Ad Soyad
A** Y**
-
Mesajlar
11
-
Beğeniler
0 / 1
-
Ticaret
0, (%0)
Aşağıdaki gibi bir kod kastetti iseniz, işe yaramadı maalesef.. Sayi değişkeni ne şekilde artıp 10 olacak, o noktayı da anlayamadım.
Kodu yanlış yazmış isem, düzeltip yeniden yazmanız mümkün mü ?
Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim sayi As Integer
Me.Show()
PictureBox1.Image = My.Resources.Intro_CL
sayi = 0
If (sayi = 10) Then
Me.Close()
End If
End Sub
Aday
WM Aracı
Kullanıcı
-
Üyelik
26.03.2014
-
Yaş/Cinsiyet
62 / E
-
Meslek
İnş. Müh.
-
Konum
İstanbul Anadolu
-
Ad Soyad
A** Y**
-
Mesajlar
11
-
Beğeniler
0 / 1
-
Ticaret
0, (%0)
Teşekkür ediyorum, sağolun...