Visual basic 6 dan anlayanlar

sagokafkef37

sagokafkef37

Üye
4 Eki 2012
194
0
Merhaba Arkadaşlar.

Benim vb6 da bir projem var fakat bazı şeyleri tam olarak halledemedim. Kısaca anlatayım.

Commond buttona tıkladığım zaman progress bar yavaş yavaş dolacak ve en sonunda bir mesaj bırakacak.

Temsili resim :
Download-Progress-Bar.png


Yani yavaş yavaş dolup bana msgbox gösterecek.

Şimdiden teşekkürler.

Arkadaşlar bir sorunum daha var.

Ben textbox da sadece rakamları yazmayı yaptım fakat bu sayıyı 999999... diye sonsuza kadar gidiyor. Yani baya bi yazıyoruz. ben bunu sadece 3 karakter yazılacak şekilde ayarlamak istiyorum. yardım edenlere teşekkürler[/IMG]​
 
Son düzenleme:
Tarihe göre sırala Oylara göre sırala
K

karakter170

Yeni üye
6 Ağu 2015
13
0
Şöyle bir sistem yapabilirsin;

1 Adet Buton
1 Adet Timer
1 Adet Progressbar
1 Adet'te Label(% kaç olduğunu gösteriyor, isteğe bağlı)

Public Class Form1

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(1)
If ProgressBar1.Value = 100 Then
Timer1.Stop()
MsgBox("Zaman doldu :)")
End If
Label1.Text = ProgressBar1.Value & (" %")
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
End Sub
End Class

Ben sana verdim bütün kodu "ProgressBar1.Increment(1)" bu kod'taki "1" kaçar kaçar dolacağını gösteriyor. Ona göre ayarlarsın iyi günler.
 
Oyla 0 Downvote
sagokafkef37

sagokafkef37

Üye
4 Eki 2012
194
0
karakter170' Alıntı:
Şöyle bir sistem yapabilirsin;

1 Adet Buton
1 Adet Timer
1 Adet Progressbar
1 Adet'te Label(% kaç olduğunu gösteriyor, isteğe bağlı)

Public Class Form1

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(1)
If ProgressBar1.Value = 100 Then
Timer1.Stop()
MsgBox("Zaman doldu :)")
End If
Label1.Text = ProgressBar1.Value & (" %")
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
End Sub
End Class

Ben sana verdim bütün kodu "ProgressBar1.Increment(1)" bu kod'taki "1" kaçar kaçar dolacağını gösteriyor. Ona göre ayarlarsın iyi günler.
Genişletmek için tıkla ...

kardeşim bunu denedimde Timer1.Start() komutu hata veriyor.
 
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.