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.

Post: #2041

Szaman to Twoj hack, który kupiłem bo tego nie potrafie a oczywiście nie można go edytować
Vister81 to TabControl tak?

Post: #2042

Widzę, że to mój hack. Nie pisałeś nic o projekcie. Było napisać do mnie na priva to bym oczywiście pomógł.

Post: #2043

Dobra, jakoś sobie poradze. Powiec mi tylko jak to zrobić, tzn. co to jest w VB te karty jakby?

Post: #2044

Napisał ci kolega wyżej TabControl.

Post: #2045

a ktoś mi pomoże z moim zapytaniem?

Post: #2046

Pytaj

Post: #2047

Już pytałem ale ponowie Otoz chce dolaczyc dwa buttony i dwa timery do jednego progressbara. I tak... wszystko robie tak jak powinienem z tym, ze jak klikam na pierwszy button( connect with facebook) pasek sie laduje i wyskakuje komunikat ze sie hack się polaczył. Ale jak klikam button 2 (start hack) to niestety pasek sie nie laduje i odrazu wyskakuje komunikat ze zostaly dodane kredyty. Jak zrobić żeby przy drugim kliknięciu pasek rownież sie ładowal? Podać wam kod?

Post: #2048

Wklei kod może coś pomogę.

Post: #2049

Jak się nazywa program który określa pozycje naszej trony po wpisaniu słowa kluczowego?

Post: #2050

KOD TIMER 1:

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()
MessageBox.Show("Please Check your value in-account", "Success!")
Else

End If
If ProgressBar1.Value = 1 Then
Label7.Text = " Loading Proxy: 189.81.187.61:80.80"
End If
If ProgressBar1.Value = 15 Then
Label7.Text = "Generator loaded!"
End If
If ProgressBar1.Value = 25 Then
Label7.Text = "Connecting to game server.."
End If
If ProgressBar1.Value = 45 Then
Label7.Text = "Connected!"
End If
If ProgressBar1.Value = 55 Then
Label7.Text = "Searching character.."
End If
If ProgressBar1.Value = 80 Then
Label7.Text = "Characted found!"
End If
If ProgressBar1.Value = 86 Then
Label7.Text = "Transfer items.."
End If
If ProgressBar1.Value = 95 Then
Label7.Text = "Coins added! Refresh game"

End If
End Sub


KOD TIMER2


Private Sub Timer2_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
ProgressBar2.Increment(1)
If ProgressBar2.Value = ProgressBar1.Maximum Then
Timer2.Stop()
MessageBox.Show("Hack is connected", "Success!")
Else

End If
If ProgressBar2.Value = 1 Then
Label1.Text = " Verifed facebook e-mail..."
End If
If ProgressBar2.Value = 25 Then
Label1.Text = "Loading....!"
End If
If ProgressBar2.Value = 45 Then
Label1.Text = "Connecting with facebook account"
End If
End Sub


KOD BUTTON 1

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


KOD BUTTON2

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
Timer2.Start()
End Sub