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
[SZUKAM] VB - kod do generatora, losowy ale zawsze innym napis

Autor Wiadomość
DonWestbam Offline
Stały Bywalec
*

Liczba postów: 618
Dołączył: Jan 2014
Reputacja: 100 +

Galeria Wygranych: Tutaj
Forum Gold: 185.00
Post: #1
[SZUKAM] VB - kod do generatora, losowy ale zawsze innym napis
Sprawdź:
Witam.
Jak w temacie, szukam a w sumie to proszę o podanie gotowego kodu do zaprogramowania buttona żeby po kliknięciu go w textboxie pokazywało się zdanie które mu przypisze.
Chce sobie zrobić program który ułatwi mi komentowanie, wrzucę w vb kilka komentarzy zrobię szybko apke i potem klikając na generate chcę żeby pokazywał się za każdym razem inny losowy komentarz.

Kiedyś bawiłem się w fake generetory i jakiś kod tego typu miałem ale niestety mi zaginął ..

Myślę że da się zrozumieć o co mi chodzi Big Grin

Z góry dzięki za odp! Pozdrawiam Patryk

DonWestbam, dumny członek http://zarabiam.com od Jan 2014.
25-01-2016 01:59
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ć:
NoName Offline
Świeżak
*

Liczba postów: 5
Dołączył: Dec 2013
Reputacja: 0 +

Forum Gold: 0.00
Post: #2
RE: [SZUKAM] VB - kod do generatora, losowy ale zawsze innym napis
Kod:
Public Class Form1
    ' Button1 - identyfikator przycisku
    ' TextBox1 - identyfikator textboxa
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        TextBox1.Text = "test"
    End Sub
End Class

Pozdrawiam.
27-01-2016 17:21
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
DonWestbam Offline
Stały Bywalec
*

Liczba postów: 618
Dołączył: Jan 2014
Reputacja: 100 +

Galeria Wygranych: Tutaj
Forum Gold: 185.00
Post: #3
RE: [SZUKAM] VB - kod do generatora, losowy ale zawsze innym napis
chodziło mi o coś tego typu:
Kod:
Public Class Form1

        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() * 100)

                Select Case key

                    Case 1

                        TextBox1.Text = ""    
                    
                    Case 2

                        TextBox1.Text = ""

Gdy robię apke przy pomocy tego kodu i dam Case od 1 do np. 100 i w każdym inne zdanie to chciał bym żeby losowało mi się zawsze inne, używając wyżej podanego kodu zdania non stop mi się powtarzają

da się zrobić taki w którym zdania nie będą się powtarzać i zawsze będzie wyskakiwało mi w textboxie inne ?

DonWestbam, dumny członek http://zarabiam.com od Jan 2014.
29-01-2016 01:44
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
dzemba Offline
Forumowy Fanatyk
*

Liczba postów: 800
Dołączył: Jul 2013
Reputacja: 209 +

Galeria Wygranych: Tutaj
Odznaczenia:

(Zobacz Odznaczenia)
Poziom:
Forum Gold: 340.00
Post: #4
RE: [SZUKAM] VB - kod do generatora, losowy ale zawsze innym napis
By zdania się nie powtarzały, musiał byś ich mieć niekończenie wiele Tongue

I by pokazywanym elementem było jeszcze nie widziane zdanie, musiał by być jakiś mechanizm (najłatwiej plik tekstowy), który by przechowywał informacje o użyciu danego "zdania" i np po wykorzystaniu wszystkich resetował się, lub pobierał nową porcje "zdań".
(Ten post był ostatnio modyfikowany: 07-02-2016 02:44 przez dzemba.)
07-02-2016 02:43
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
NoName Offline
Świeżak
*

Liczba postów: 5
Dołączył: Dec 2013
Reputacja: 0 +

Forum Gold: 0.00
Post: #5
RE: [SZUKAM] VB - kod do generatora, losowy ale zawsze innym napis
Zaimplementuj 2 tablice o tej samej N ilości zdań jakie chcesz użyć:
- pierwsza tablica A przechowuje zdania
- druga tablica B przechowuje wartości boolowskie, wszystkie ustawione na false

(oczywiście możesz to zrobić w jednej tablicy o dwóch typach, jak wolisz)

1. Niech generator wylosuje element X z tablicy B
2. Jeżeli wartość B[X] ma wartość true wróć do pkt. 1. jeżeli false idź do pkt 3.
3. Wypisz do textboxa zdanie A[X], zaś B[X] ustaw na true

Jeżeli chcesz to podpiąć do pliku tekstowego, pisz zdania każde w nowej linijce, następnie programem pobierz plik tekstowy, rozbij go (znakiem końca linii EOL) na tablicę A i na podstawie jej N ilości elementów (zdań) wygeneruj tablicę B.

Rzuciłem najprostszy konspekt, Twoje zadanie to znaleźć wszystkie potrzebne funkcje i metody, które masz w Internecie.
07-02-2016 15:31
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
dzemba Offline
Forumowy Fanatyk
*

Liczba postów: 800
Dołączył: Jul 2013
Reputacja: 209 +

Galeria Wygranych: Tutaj
Odznaczenia:

(Zobacz Odznaczenia)
Poziom:
Forum Gold: 340.00
Post: #6
RE: [SZUKAM] VB - kod do generatora, losowy ale zawsze innym napis
(07-02-2016 15:31)NoName napisał(a):  Zaimplementuj 2 tablice o tej samej N ilości zdań jakie chcesz użyć:
- pierwsza tablica A przechowuje zdania
- druga tablica B przechowuje wartości boolowskie, wszystkie ustawione na false

(oczywiście możesz to zrobić w jednej tablicy o dwóch typach, jak wolisz)

1. Niech generator wylosuje element X z tablicy B
2. Jeżeli wartość B[X] ma wartość true wróć do pkt. 1. jeżeli false idź do pkt 3.
3. Wypisz do textboxa zdanie A[X], zaś B[X] ustaw na true

Jeżeli chcesz to podpiąć do pliku tekstowego, pisz zdania każde w nowej linijce, następnie programem pobierz plik tekstowy, rozbij go (znakiem końca linii EOL) na tablicę A i na podstawie jej N ilości elementów (zdań) wygeneruj tablicę B.

Rzuciłem najprostszy konspekt, Twoje zadanie to znaleźć wszystkie potrzebne funkcje i metody, które masz w Internecie.

twoja magiczna tablica o dwóch typach, co to jest?
tablica struktur ?
tablica obiektów ?
wersja tablicy asocjacyjnej ?
coś w rodzaju mapy ?
nie jestem ekspertem od typów tablic w VB, ale na pewno nie ma czegoś takiego co opisałeś.

Ogólnie to co napisałeś ma sens, ale postaraj się pisać to albo prościej, albo jak już używasz nomenklatury od danego języka (o który jest pytanie), to staraj się pisać bardziej zrozumiale, bo wychodzi mało zrozumiały bełkot.
(Ten post był ostatnio modyfikowany: 08-02-2016 23:22 przez dzemba.)
08-02-2016 23:11
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
DonWestbam Offline
Stały Bywalec
*

Liczba postów: 618
Dołączył: Jan 2014
Reputacja: 100 +

Galeria Wygranych: Tutaj
Forum Gold: 185.00
Post: #7
RE: [SZUKAM] VB - kod do generatora, losowy ale zawsze innym napis
Gdyby ktoś może też tego poszukiwał to proszę
Kod:
Public Class Form1

    Dim strCytat() As String = IO.File.ReadAllLines("ścieżka do pliku")
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        If strCytat.Length > 0 Then

            Dim lCytat As String = strCytat(GetRandom(strCytat.Count))

            TextBox1.Text = lCytat

            strCytat = strCytat.Where(Function(s) s IsNot lCytat).ToArray

        End If

    End Sub

    Private random As New Random

    Private Function GetRandom(m As Integer) As Integer

        Return random.Next(0, m)

    End Function

    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        If TextBox1.Text <> String.Empty Then
            Clipboard.SetText(TextBox1.Text)
        Else
            Clipboard.Clear()
        End If
    End Sub
End Class

Tłumaczyłem to w formie losowania cytatów na innym forum i dostałem kod który dodatkowo trochę przerobiłem.

na przykładzie losowania tych cytatów, robimy plik txt i wrzucamy w niego cytaty które mają być losowane, jeden w lini, button2 jest zaprogramowany na kopiowanie, czyli button 1 generuje button 2 od razu kopiuje
dodam że program przelosuje cały spis a następnie trzeba go zresetować, nie pozwoli danemu cytatowi się powtórzyć

DonWestbam, dumny członek http://zarabiam.com od Jan 2014.
Glosy: Czaq (+1)
11-02-2016 03:22
Znajdź wszystkie posty użytkownika Odpowiedz cytując ten post
Odpowiedz 


Podobne wątki
Wątek: Autor Odpowiedzi: Wyświetleń: Ostatni post
  Kod wyskakującego okienka 0px na 0px bestek112 1 3,179 14-12-2019 12:40
Ostatni post: Gremquen
  Jaki kod pod czat w html5 i css3 helix 5 5,300 15-01-2018 14:07
Ostatni post: helix
  [Poszukuję] Kod, który przesuwa baner reklamę podczas przewijania Resk 7 6,311 22-11-2017 22:07
Ostatni post: DGHubert
  Kod do masowego zapraszania na wydarzenie pietreczka 2 4,384 10-10-2014 11:17
Ostatni post: pietreczka
  Prosty kod, plugin wordpress Daroslawo 2 2,606 12-04-2014 00:00
Ostatni post: surfer0700

Skocz do:


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