Formlar arası geçiş #Yardım#

G

Gannicus

Üye
29 Mar 2013
105
0
Arkadaşlar Şimdi Bir program kodluyorum vb 6 la
Bu Kodla Form 2ye geçiyor
Kod: 
Private Sub Timer1_Timer()
If ProgressBar1.Value = 100 Then
Timer1.Enabled = False
MsgBox "Yükleme Başarıyla Tamamlandı", vbInformation, "Başarılı"
Form2.Show
Else
ProgressBar1.Value = (ProgressBar1.Value) + Val(1)
End If
End Sub
Bu Kodla Form 1 in kapanmasını sağlıyıp form 2 ye otmatik geçmesini istiyorum ama öyle olmuyor form 1 kapanınca form 2 açılmıyor yardım edin
Kod: 
Private Sub Timer1_Timer()
If ProgressBar1.Value = 100 Then
Timer1.Enabled = False
MsgBox "Yükleme Başarıyla Tamamlandı", vbInformation, "Başarılı"
End
Form2.Show
Else
ProgressBar1.Value = (ProgressBar1.Value) + Val(1)
End If
End Sub
​
 
Tarihe göre sırala Oylara göre sırala
Y

yuski

Uzman üye
1 Şub 2011
1,010
0
Gannicus' Alıntı:
Arkadaşlar Şimdi Bir program kodluyorum vb 6 la
Bu Kodla Form 2ye geçiyor
Kod: 
Private Sub Timer1_Timer()
If ProgressBar1.Value = 100 Then
Timer1.Enabled = False
MsgBox "Yükleme Başarıyla Tamamlandı", vbInformation, "Başarılı"
Form2.Show
Else
ProgressBar1.Value = (ProgressBar1.Value) + Val(1)
End If
End Sub
Bu Kodla Form 1 in kapanmasını sağlıyıp form 2 ye otmatik geçmesini istiyorum ama öyle olmuyor form 1 kapanınca form 2 açılmıyor yardım edin
Kod: 
Private Sub Timer1_Timer()
If ProgressBar1.Value = 100 Then
Timer1.Enabled = False
MsgBox "Yükleme Başarıyla Tamamlandı", vbInformation, "Başarılı"
[COLOR="Red"]End[/COLOR]
Form2.Show
Else
ProgressBar1.Value = (ProgressBar1.Value) + Val(1)
End If
End Sub
​
Genişletmek için tıkla ...

kırmızı YEri
Sadece Oradaki End KOdunu sil yerine" unload me " yaz
 
Oyla 0 Downvote
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.