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!
Wybierz Styl: Aktywuj czarny styl Aktywuj jasny styl Aktywuj mobilny styl
Forum o zarabianiu przez Internet !
praca w domu Witaj serdecznie forum o zarabianiu Zarabiam.com
forum o zarabianiu przez internet

Witaj! Nie bez powodu trafiłeś na największe w Polsce Forum o Zarabianiu przez internet! Tutaj gromadzimy pasjonatów zdobywania pieniędzy online i dajemy możliwość poznania tajników pracy w domu. Coraz więcej osób poszukuje sposobów na zarabianie w sieci, co sprawia, że praca w domu przez internet staje się atrakcyjnym źródłem dochodu. W dzisiejszych czasach, zarabianie online to nie tylko alternatywa, ale często również znakomita opcja do tradycyjnej pracy na etacie. Czy zastanawiasz się, jak łatwo zarobić pieniądze? Jeśli tak, to właściwe miejsce! Internet jest pełen możliwości, a my jesteśmy tutaj, aby Ci pomóc, dzieląc się wiedzą i doświadczeniami.

Rejestracja na naszym forum jest całkowicie darmowa i niesie ze sobą wiele korzyści:

  • Zakładaj nowe wątki i bierz udział w dyskusjach,
  • Odblokuj dostęp do czatu (Shoutbox),
  • Ogranicz liczbę wyświetlanych reklam,
  • Zdobywaj odznaczenia i reputację,
  • Zyskaj dostęp do ukrytych działów, tematów i linków,
  • Przeglądaj galerię zdjęć i filmów z wygranymi nagrodami,
  • Dostosuj swój prywatny profil,
  • Weź udział w konkursach organizowanych na forum,
  • Skorzystaj z doświadczenia społeczności zarabiającej online od lat,
  • Porównaj stopy procentowe na kontach oszczędnościowych,
  • Wykorzystaj merytoryczną wiedzę naszych użytkowników, by zarabianie w domu stało się łatwiejsze niż kiedykolwiek,
  • Dowiedz się, gdzie zdobyć darmowe upominki, gadżety i próbki.
  • Pamiętaj to nic nie kosztuje, zarabiam.com to darmowe forum internetowe w którym zasięgniesz informacji "jak zarabiać przez internet".
I co najważniejsze, wszystko to jest zupełnie za darmo! Zarabiam.com to internetowe forum, które udzieli Ci odpowiedzi na pytanie "jak zarabiać przez internet". Teraz praca w domu staje się możliwa! Zarejestruj się już teraz, a dowiesz się wszystkiego o zarabianiu przez internet!

praca w domu


Zapraszamy na Nasze Serwery Minecraft oraz Serwer Minecraft



Odpowiedz 
 
Ocena wątku:
  • 0 Głosów - 0 Średnio
  • 1
  • 2
  • 3
  • 4
  • 5
Visual Basic 2 textboxy » Jak zrobić działające 2 textboxy

Autor Wiadomość
Jojo693 Offline
Aktywny
*

Liczba postów: 100
Dołączył: Feb 2013
Reputacja: 8 +

Forum Gold: 0.00
Post: #1
Visual Basic 2 textboxy
Sprawdź:
Hejka ! Mam taki problem, że chce zrobić apke z 2 textboxami i gdy pasek dojdzie do konca to w obu texbtoxach pokaze sie jakiś przezemnie wpisany tekst tylko jak to zrobic ? coś ala generator kont do brazzers gdzie mamy login i hasło Big Grin

mam taki kod http://scr.hu/0kwu/15a47
ale nie działa :<

Jojo693, dumny członek http://zarabiam.com od Feb 2013.
04-06-2013 19:01
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
Ania Online
Forumowy Maniak


Liczba postów: 1241
Dolaczyl: Jan 2012
Reputacja: 1712

Poziom ostrzezen: 0%
Forum Gold: 215.61 [Dotacja]

Warto sprawdzić:
bolo9797 Offline
Przyjaciel Forum
*

Liczba postów: 3,242
Dołączył: Nov 2012
Reputacja: 768 +

Galeria Wygranych: Tutaj
Odznaczenia:

(Zobacz Odznaczenia)
Poziom:
Forum Gold: 109.57
Post: #2
RE: Visual Basic 2 textboxy
Msgbox Smile
link do kodu nie dziala :/
04-06-2013 19:07
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
Jojo693 Offline
Aktywny
*

Liczba postów: 100
Dołączył: Feb 2013
Reputacja: 8 +

Forum Gold: 0.00
Post: #3
RE: Visual Basic 2 textboxy
(04-06-2013 19:07)bolo9797 napisał(a):  Msgbox Smile
link do kodu nie dziala :/

działa ten link co dałem Tongue

Jojo693, dumny członek http://zarabiam.com od Feb 2013.
04-06-2013 19:37
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
yazir Offline
Przyjaciel Forum
*

Liczba postów: 9,114
Dołączył: Aug 2012
Reputacja: 2447 +

Galeria Wygranych: Tutaj
Odznaczenia:

(Zobacz Odznaczenia)
Poziom:
Forum Gold: 75.61
Post: #4
RE: Visual Basic 2 textboxy
Coś chyba próbujesz przekombinować Xpokerface
Co dokładnie ma się dziać?
Nie wystarczy coś takiego?

Kod:
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()
            Dim key As Integer
            key = (Rnd() * 3)
            TextBox1.Text = "a"
            TextBox2.Text = key
        End If
    End Sub

xD
dX
04-06-2013 19:49
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
Jojo693 Offline
Aktywny
*

Liczba postów: 100
Dołączył: Feb 2013
Reputacja: 8 +

Forum Gold: 0.00
Post: #5
RE: Visual Basic 2 textboxy
(04-06-2013 19:49)yazir napisał(a):  Coś chyba próbujesz przekombinować Xpokerface
Co dokładnie ma się dziać?
Nie wystarczy coś takiego?

Kod:
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()
            Dim key As Integer
            key = (Rnd() * 3)
            TextBox1.Text = "a"
            TextBox2.Text = key
        End If
    End Sub

omg errory wyskakuja Big Grin tak wyglada teraz mój cały kod na którym operuje :
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()
Dim key As Integer
key = (Rnd() * 3)
Select Case key
Case 1:
TextBox1.Text = "aaa"
TextBox2.Text = "bbb"
End Select
MessageBox.Show("Success")
Else
If ProgressBar1.Value = 1 Then
Label7.Text = "Loading.."
End If
If ProgressBar1.Value = 35 Then
Label7.Text = "Generator loaded!"
End If
If ProgressBar1.Value = 55 Then
Label7.Text = "Searching working account"
End If
If ProgressBar1.Value = 85 Then
Label7.Text = "Working Account found!"
End If
If ProgressBar1.Value = 95 Then
Label7.Text = "Success!"
End If
End If
End Sub
End Class

no i dupa Tongue a jak wkleje kodo d Cb yazir to mam error statement cośtam Tongue ogólnie ja operuja na poradniku rocknkdruga i wklejam gotowce bo mi więcej nie potrzeba, tylko tutaj mam problem Tongue

a no ma się dziać jak tkai generator kont do brazzers czyli : klikamy button i leci progressbar ktory informuje co się dzieje typu "loading" "searching" i jak pasek dojdzie do konca to w textbox1 pokazuje sie login a w textbox2 pokazuje się hasło Smile

Jojo693, dumny członek http://zarabiam.com od Feb 2013.
(Ten post był ostatnio modyfikowany: 04-06-2013 20:20 przez Jojo693.)
04-06-2013 20:10
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
ceha_wb Offline
Świeżak
*

Liczba postów: 19
Dołączył: Feb 2013
Reputacja: 8 +

Galeria Wygranych: Tutaj
Forum Gold: 5.00
Post: #6
RE: Visual Basic 2 textboxy
ProgressBar1.Increment(1)
If ProgressBar1.Value = ProgressBar1.Maximum Then
Timer1.Stop()
Dim key As Integer
key = (Rnd() * 3)
TextBox1.Text = "aaa"
TextBox2.Text = "bbb"
MessageBox.Show("Success")
Else
If ProgressBar1.Value = 1 Then
Label7.Text = "Loading.."
End If
If ProgressBar1.Value = 35 Then
Label7.Text = "Generator loaded!"
End If
If ProgressBar1.Value = 55 Then
Label7.Text = "Searching working account"
End If
If ProgressBar1.Value = 85 Then
Label7.Text = "Working Account found!"
End If
If ProgressBar1.Value = 95 Then
Label7.Text = "Success!"
End If
End If
End Sub
End Class


Teraz powinno działaćSmile
Glosy: Jojo693 (+1)
04-06-2013 20:41
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
Jojo693 Offline
Aktywny
*

Liczba postów: 100
Dołączył: Feb 2013
Reputacja: 8 +

Forum Gold: 0.00
Post: #7
RE: Visual Basic 2 textboxy
(04-06-2013 20:41)ceha_wb napisał(a):  ProgressBar1.Increment(1)
If ProgressBar1.Value = ProgressBar1.Maximum Then
Timer1.Stop()
Dim key As Integer
key = (Rnd() * 3)
TextBox1.Text = "aaa"
TextBox2.Text = "bbb"
MessageBox.Show("Success")
Else
If ProgressBar1.Value = 1 Then
Label7.Text = "Loading.."
End If
If ProgressBar1.Value = 35 Then
Label7.Text = "Generator loaded!"
End If
If ProgressBar1.Value = 55 Then
Label7.Text = "Searching working account"
End If
If ProgressBar1.Value = 85 Then
Label7.Text = "Working Account found!"
End If
If ProgressBar1.Value = 95 Then
Label7.Text = "Success!"
End If
End If
End Sub
End Class


Teraz powinno działaćSmile

o super działa Big Grin a jeśli chciałbym dodać więcej tekstów do textbox1 i textbox2 to jak ten kod zmodyfikować ? że jak klikam w generate to mam w login aaa i w password bbb i jak klikam nastepny raz to kolejno mam ccc i ddd Tongue

Jojo693, dumny członek http://zarabiam.com od Feb 2013.
04-06-2013 21:11
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
ceha_wb Offline
Świeżak
*

Liczba postów: 19
Dołączył: Feb 2013
Reputacja: 8 +

Galeria Wygranych: Tutaj
Forum Gold: 5.00
Post: #8
RE: Visual Basic 2 textboxy
ProgressBar1.Increment(1)
If ProgressBar1.Value = ProgressBar1.Maximum Then
Timer1.Stop()
Dim key As Integer
key = (Rnd() * 4)
Select Case key
Case 1
TextBox1.Text = "aaa"
TextBox2.Text = "bbb"
Case 2
TextBox1.Text = "ccc"
TextBox2.Text = "ddd"
Case 3
TextBox1.Text = "eee"
TextBox2.Text = "fff"
Case 4
TextBox1.Text = "ggg"
TextBox2.Text = "hhh"
End Select
MessageBox.Show("Success")
Else
If ProgressBar1.Value = 1 Then
Label7.Text = "Loading.."
End If
If ProgressBar1.Value = 35 Then
Label7.Text = "Generator loaded!"
End If
If ProgressBar1.Value = 55 Then
Label7.Text = "Searching working account"
End If
If ProgressBar1.Value = 85 Then
Label7.Text = "Working Account found!"
End If
If ProgressBar1.Value = 95 Then
Label7.Text = "Success!"
End If
End If



Jeżeli będziesz chciał dodać więcej kodów wpisujesz po prostu Case 5 itd ale musisz pamiętać,że wtedy musisz zmienić cyferkę w tym wierszu "key = (Rnd() * 4) "
(Ten post był ostatnio modyfikowany: 05-06-2013 17:48 przez ceha_wb.)
Glosy: Jojo693 (+1)
05-06-2013 17:47
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
Odpowiedz 


Podobne wątki
Wątek: Autor Odpowiedzi: Wyświetleń: Ostatni post
  Visual Basic 2010 Express PaulRcootiC 1 1,262 26-01-2014 12:05
Ostatni post: matek697
  Virtual Basic- info o wirusie As7 5 1,239 28-07-2013 23:11
Ostatni post: JaviDesire
  Problem z Visual Basic WazzaP 4 1,873 18-07-2013 16:18
Ostatni post: Coristo
  Kod do Visual Basic AdrYan12 4 2,750 11-05-2013 14:02
Ostatni post: mikifiki99
  Jak zapisać plik w progremie visual basic 2010 matig20 4 2,379 05-05-2013 13:40
Ostatni post: Szaman1644

Skocz do:


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