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.

~~afghan~~ · 08-07-2013 17:35

Siemanko
Mam mały problem z komunikatem. O co chodzi wiec tak po "progresbar 100%"
chce aby wyskoczył mi komunikat przekierowujący na stronę. Kod mam ale coś jest nie tak bo jak dochodzi "progresbar 100%" nie wyskakuje komunikat dopiero jak kliknę raz na progresbar to wyskakuje mi komunikat. Jak by ktoś się znał to mógł by mi to ktoś poprawić. Bo na pewno jest to banalne a ja już nie wiem co ja sknociłem.

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

            Label1.Text = ("DONE")

        End If

    End Sub

    Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click

        If ProgressBar1.Value = ProgressBar1.Maximum Then

            If MsgBox("wejdź", MsgBoxStyle.OkCancel) = vbOK Then

                Process.Start("http://allegro.pl")

            End If

        End If

    End Sub

End Class

~~Coristo~~ · 09-07-2013 12:39

Cytat: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
Label1.Text = ("DONE")
MsgBox("odpalam allegro", MsgBoxStyle.Information)
If MsgBoxResult.Ok Then
Process.Start("http://allegro.pl")
End If

End If
End Sub
End Class

~~Coristo~~ · 09-07-2013 14:28

Wątek zostaje zamknięty, ponieważ moderator uznał że temat został wyczerpany bądź rozwiązany. Jeśli posiadasz nowe pytania prosimy o założenie kolejnego tematu.

**Admin** · 27-07-2013 08:51

Wątek został przeniesiony do kosza.
Prawdopodobne przyczyny :

1. Temat jest niezgodny z regulaminem.
2. Podobny temat znajduje się już na forum.
3. Wątek nie jest już aktulany.
4. Autor prosił o jego przeniesienie.
5. Temat został wyczerpany bądź rozwiązany.

Pozdrawiamy
Administracja Forum.

Podobne wątki
Wątek:		Autor	Odpowiedzi:	Wyświetleń:	Ostatni post
	[Szukam] Czat pod stronę xxx	cannot	3	3,507	14-02-2023 19:36 Ostatni post: Hybrid1990
	Bannery / Reklamy / Filmiki na stronę ?	Maciej_P	1	2,073	16-10-2021 21:56 Ostatni post: Hybrid1990
	Jaki szablon Wordpress pod stronę Download APK	emilub	1	2,465	12-10-2021 21:48 Ostatni post: Hybrid1990
	Pomysł na przenoszenie ludzi z insta na fb, jaki program, oferta?	azzaz	1	2,534	12-10-2021 21:48 Ostatni post: Hybrid1990
	[Szukam] Video reklamy na stronę	playdewu	1	860	05-10-2021 17:55 Ostatni post: Hybrid1990

Tryb drzewa \| Tryb normalny [Problem] VB Button przenoszenie na strone reput + 1FG » ++++++++++
Autor	Wiadomość