Praca w domu - Dodatkowa Praca - Zarabianie przez Internet. Dołącz do Największego w Polsce forum o tematyce Zarabiania przez Internet. Praca w domu stała się bardzo popularna.

CMRR · 04-06-2013 19:04

Sprawdź:

A wiesz chociaż jak wygląda msgbox?

Vister81 · 04-06-2013 19:07

Możliwe, że nie Jerk

2

alizen · 04-06-2013 19:23

mam takie coś

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

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(1)
If ProgressBar1.Value = ProgressBar1.Maximum Then
MsgBox("xx", 0, "xx")

End If
End Sub
End Class

progressbar przejdzie do końca i wtedy wyskakuje co chwile to z msgbox i robi mi spam na ekranie

bolo9797 · 04-06-2013 19:34

A gdzie timer.stop??

JaviDesire · 04-06-2013 19:35

Bo nie ma funkcji zatrzymującej timer.
W Timerze dopisz na końcu: Timer1.Stop()

alizen · 04-06-2013 19:58

dodałem w timerze timer1.Stop() to w ciągu sekundy dochodzi do końca i dalej spamuje msgboxami

_____________________
@edit
co w tym kodzie jest zle?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(1)
If ProgressBar1.Value = ProgressBar1.Maximum Then
Timer1.Stop()
Else
MsgBox("sdsd", 0, "asda")

End If

End Sub

idzie progres bar w tym czasie spamuje msgboxami. Gdy progressbar przejdzie do końca przestaje boxami spamoawc

JaviDesire · 04-06-2013 20:33

Trzymaj od razu cały kod programu, żeby nie trzeba było milion postów pisać Tongue

Kod:

Public Class Form1

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

        Timer1.Start()

    End Sub

    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()

        End If

        If ProgressBar1.Value = ProgressBar1.Maximum Then

            MessageBox.Show("xx", "yy")

        End If

    End Sub

End Class

Jojo693 · 04-06-2013 20:37

(04-06-2013 20:33)JaviDesire napisał(a): Trzymaj od razu cały kod programu, żeby nie trzeba było milion postów pisać

Kod:

Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Timer1.Start() End Sub 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() End If If ProgressBar1.Value = ProgressBar1.Maximum Then MessageBox.Show("xx", "yy") End If End Sub End Class

Heeeeej !!! Pomożesz mi w tym temacie ? Smile

http://zarabiam.com/Temat-Visual-Basic-2-textboxy-70553

bolo9797 · 04-06-2013 20:42

Omg bo pewnie w tymer masz 40 milisekund... Zmien na tyle timer zeby okienko pokazalo sie po zaladowaniu.

Podobne wątki
Wątek:		Autor	Odpowiedzi:	Wyświetleń:	Ostatni post
	Fake hack - skrypt do zwiększania wartość licznika?	flown	2	3,559	11-02-2017 16:02 Ostatni post: zbyszeq
	Fake czy Real content?	Camaxtle	30	23,147	21-01-2016 11:24 Ostatni post: ReadForums
	crack/keygen działający s	MACOS	3	1,369	30-09-2015 20:50 Ostatni post: Koja
	Tworzenie fake haków?	Plasky	5	3,225	05-04-2015 14:17 Ostatni post: Plasky
	Problem z fake ankietą	wallhack	1	2,119	06-07-2014 19:53 Ostatni post: Klin

Tryb drzewa \| Tryb normalny fake crack » need help
Autor	Wiadomość