Witaj gościu! Zaloguj się lub Zarejestruj aby móc korzystać ze wszystkich funkcjonalności jakie oferuje to forum! Rozpocznij zarabianie przez internet, poznaj korzysci pracy w domu! Rejestracja i korzystanie z forum jest całkowicie darmowe!
Polska społeczność o zarabianiu przez internet, pracy w domu i dodatkowej pracy online Zobacz dzisiejsze dyskusje →
Wątek zamknięty 
[Problem] VB Button przenoszenie na strone reput + 1FG » ++++++++++

Autor Wiadomość
Post: #1
[Problem] VB Button przenoszenie na strone reput + 1FG
Sprawdź:
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
Post: #2
RE: [Problem] VB Button przenoszenie na strone reput + 1FG
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
Glosy: afghan (+1)
Post: #3
[Problem] VB Button przenoszenie na strone reput + 1FG
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.
Post: #4
[Problem] VB Button przenoszenie na strone reput + 1FG
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.

[Obrazek: zarabiam.com.png]
Wątek zamknięty 


Podobne wątki
Wątek: Autor Odpowiedzi: Wyświetleń: Ostatni post
  reddiTraffic [Generuj ruch na swoją stronę] radek0389 9 1,777 05-03-2026 13:21
Ostatni post: Hybrid1990
  Kupimy Twoją stronę internetową z monetyzacją Google AdSense ? EvaDav 1 339 18-02-2026 08:17
Ostatni post: Hybrid1990
  Zarabianie przez stronę Dogry.pl DoubleTapMaster 1,168 190,984 26-11-2025 20:19
Ostatni post: Hybrid1990
  Teleport Pro - skopiuj każdą stronę do HTML Harry. 7 3,247 11-11-2025 20:25
Ostatni post: Hybrid1990
  [Szukam] Czat pod stronę xxx cannot 3 3,885 14-02-2023 19:36
Ostatni post: Hybrid1990

Skocz do:


Użytkownicy przeglądający ten wątek: