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 →
Praca w domu - Dodatkowa Praca - Zarabianie przez Internet / Uploading / Dyskusja o Uploadzie v / Kod do Visual Basic
Odpowiedz 
Kod do Visual Basic

Autor Wiadomość
AdrYan12 Offline
PoczÄ…tkujÄ…cy
*
Liczba postów: 58
Dołączył: Dec 2012
Reputacja: 25 +
Forum Gold: 5.00
Post: #1
Kod do Visual Basic
Sprawdź:
Witam. Mógłby mi ktoś udostępnić kod do VB, żeby generowało kody po kliknięciu przycisku?
19-02-2013 14:53
Odpowiedz cytujÄ…c ten post
szybkikwit Offline
Stały Bywalec
*
Liczba postów: 505
Dołączył: Nov 2012
Reputacja: 135 +
Odznaczenia:

(Zobacz Odznaczenia)
Poziom:
Forum Gold: 42.00
Post: #2
RE: Kod do Visual Basic
W Necie masz dużo poradników jak zrobić keygena itd. !! nikt CI nie da gotowego choć w sumie nie ma dużo roboty z tym ;P ale spróbuj sam zrobić bardziej Ci się to opłaci i będziesz na przyszłość już coś umiał ! Smile
19-02-2013 15:39
Odpowiedz cytujÄ…c ten post
pikusix1 Offline
Forumowy Fanatyk
*
Liczba postów: 878
Dołączył: Jul 2011
Galeria Wygranych: Tutaj
Odznaczenia:

(Zobacz Odznaczenia)
Poziom:
Forum Gold: 0.00
Post: #3
RE: Kod do Visual Basic
Kod:
Dim key As Integer
key = (Rnd() * 3+1)
Select Case key
Case 1
TextBox1.Text = "wpisz kod"
Case 2
TextBox1.Text = "wpisz kod"
Case 3
TextBox1.Text = "wpisz kod"
End Select
19-02-2013 16:51
Odpowiedz cytujÄ…c ten post
Skipi Offline
Sprzedałem się za 5zł
*
Liczba postów: 1,015
Dołączył: Apr 2012
Galeria Wygranych: Tutaj
Forum Gold: 8.00
Post: #4
RE: Kod do Visual Basic
(19-02-2013 16:51)pikusix1 napisaÅ‚(a):  
Kod:
Dim key As Integer
key = (Rnd() * 3+1)
Select Case key
Case 1
TextBox1.Text = "wpisz kod"
Case 2
TextBox1.Text = "wpisz kod"
Case 3
TextBox1.Text = "wpisz kod"
End Select

Sorry ale co to za gó*** ? Jerk2

Kod:
LOL_LOL:
        Dim AA As Decimal = Int(Rnd() * 10000)
        Dim BB As Decimal = Int(Rnd() * 10000)
        Dim CC As Decimal = Int(Rnd() * 10000)
        Dim DD As Decimal = Int(Rnd() * 10000)
        Dim EE As Decimal = Int(Rnd() * 10000)
        If AA > 1000 And BB > 1000 And CC > 1000 And DD > 1000 And EE > 1000 Then
            If AA + BB + CC + DD + EE - 35927 Then
            Dim serial As String = AA & "-" & BB & "-" & CC & "-" & DD & "-" & EE
                serial = serial.Replace("2", "G")
                serial = serial.Replace("4", "Z")
                serial = serial.Replace("6", "S")
                serial = serial.Replace("8", "N")
                TextBox1.Text = serial
                Exit Sub
            Else
                GoTo lol_lol
            End If
        Else
            GOTO LOL_LOL
        End If
19-02-2013 18:00
Odpowiedz cytujÄ…c ten post
mikifiki99 Offline
Banned
*
Liczba postów: 36
Dołączył: Jan 2013
Forum Gold: 0.00
Post: #5
RE: Kod do Visual Basic
ProszÄ™ bardzo kod z gotowymi CDkeyami, wklejasz go do timera. http://tny.cz/cd5567c1
(Ten post był ostatnio modyfikowany: 11-05-2013 14:03 przez mikifiki99.)
11-05-2013 14:02
Odpowiedz cytujÄ…c ten post
Odpowiedz 


Podobne wÄ…tki
Wątek: Autor Odpowiedzi: Wyświetleń: Ostatni post
Question Kod MD5 Dadinio 2 1,594 21-04-2015 15:01
Ostatni post: Dadinio
  Visual Basic 2010 Express PaulRcootiC 1 1,809 26-01-2014 12:05
Ostatni post: matek697
  Virtual Basic- info o wirusie As7 5 1,704 28-07-2013 23:11
Ostatni post: JaviDesire
  Problem z Visual Basic WazzaP 4 2,360 18-07-2013 16:18
Ostatni post: Coristo
  Visual Basic 2 textboxy Jojo693 7 2,089 05-06-2013 17:47
Ostatni post: ceha_wb

Skocz do:


Użytkownicy przeglądający ten wątek:
SOHO Partners reklama