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!
Praca w domu - Dodatkowa Praca - Zarabianie przez Internet
fake crack - Wersja do druku

+- Praca w domu - Dodatkowa Praca - Zarabianie przez Internet (https://zarabiam.com)
+-- Dział: Uploading (/Forum-Uploading-282)
+--- Dział: Dyskusja o Uploadzie (/Forum-Dyskusja-o-Uploadzie-286)
+--- Wątek: fake crack (/Temat-fake-crack-70411)

Strony: 1 2

RE: fake crack - CMRR - 04-06-2013 19:04

A wiesz chociaż jak wygląda msgbox?

RE: fake crack - Vister81 - 04-06-2013 19:07

Możliwe, że nie Jerk2

RE: fake crack - 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

RE: fake crack - bolo9797 - 04-06-2013 19:34

A gdzie timer.stop??

RE: fake crack - JaviDesire - 04-06-2013 19:35

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

RE: fake crack - 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

RE: fake crack - 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


RE: fake crack - 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ć 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

Heeeeej !!! Pomożesz mi w tym temacie ? Smile http://zarabiam.com/Temat-Visual-Basic-2-textboxy-70553

RE: fake crack - bolo9797 - 04-06-2013 20:42

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