Skocz do zawartości

RichTextBox Loading

xDuffie

Przez xDuffie,
w Visual Basic

Rekomendowane odpowiedzi

xDuffie

xDuffie

Opublikowano
Opublikowano (edytowane)

Hej!
Ostatnio długo szukałem takie poradnika, ale niestety go nie znalazłem, więc postanowiłem na własną rękę (+ z pomocą różnych filmików z YouTube) zdobyć wiedzę jak takowy Loading zrobić. Po dwóch dniach przeglądania sieci w końcu udało mi się osiągnąć efekt, jaki chciałem.

Dziś się nim z Wami podzielę.  :)

giphy.gif

 

1. Okej, na początku tworzymy nowy Form i dodajemy RichTextBox, Button, ProgressBar oraz Timer.
2. Następnie naciskamy dwa razy na button i dodajemy taki kod

Timer1.Start()

3. Następnie, naciskamy dwa razy na Timer i dodajemy kod:

ProgressBar1.Increment(1)If ProgressBar1.Value = 1 ThenRichTextBox1.Text = RichTextBox1.Text & "Loading jakiśtam.dll..." & vbCrLfEnd IfIf ProgressBar1.Value = 15 ThenRichTextBox1.Text = RichTextBox1.Text & "Loading jakiśtam2.dll..." & vbCrLfEnd IfIf ProgressBar1.Value = 25 ThenRichTextBox1.Text = RichTextBox1.Text & "Loading jakiśtam4.dll..." & vbCrLfEnd IfIf ProgressBar1.Value = 45 ThenRichTextBox1.Text = RichTextBox1.Text & "Loading 7567567..." & vbCrLfEnd IfIf ProgressBar1.Value = 55 ThenRichTextBox1.Text = RichTextBox1.Text & "Loading Lollol.dll..." & vbCrLfEnd IfIf ProgressBar1.Value = 80 ThenRichTextBox1.Text = RichTextBox1.Text & "Można wpisywać co się chce" & vbCrLfEnd IfIf ProgressBar1.Value = 86 ThenRichTextBox1.Text = RichTextBox1.Text & "BlaBlabla" & vbCrLfEnd IfIf ProgressBar1.Value = 95 ThenRichTextBox1.Text = RichTextBox1.Text & "Make-cash.pl" & vbCrLfEnd If

Oczywiście dostosowujemy go pod siebie zmieniając tekst oraz ProgressBar1.Value na jakie chcemy lub dodając więcej linijek tekstu.
Jeżeli komuś przeszkadza progressbar to możemy go tak schować (ale on i tak musi być! Nie wolno go usuwać!):
giphy.gif
 

 

Jeżeli jednak ktoś wolałby zamienić RichTextBox na zwykły label, który by zmieniał się wraz z wzrostem wartości progressbar1, to wystarczy zamiast RichTextBox'a dodać Label, a kod z Timera dać taki:

ProgressBar1.Increment(1)If ProgressBar1.Value = 1 ThenLabel4.Text = "Ładowanie"End IfIf ProgressBar1.Value = 15 ThenLabel4.Text = "Łączenie ze serwerem"End IfIf ProgressBar1.Value = 25 Then Label4.Text = "Wczytywanie ustawień konta"End IfIf ProgressBar1.Value = 45 ThenLabel4.Text = "Wczytywanie danych..."End IfIf ProgressBar1.Value = 55 ThenLabel4.Text = "Wczytywanie danych - zakończone!"End IfIf ProgressBar1.Value = 80 ThenLabel4.Text = "Łączenie z bazą..."End If If ProgressBar1.Value = 86 ThenLabel4.Text = "Wczytano pomyślnie!"End IfIf ProgressBar1.Value = 95 ThenLabel4.Text = "Proces zakończył się SUKCESEM!"End If

Wtedy efekt prezentuje się tak:

giphy.gif

 

Jeżeli poradnik przydał Ci się do czegokolwiek, to kliknij przycisk 7gm.png  :wub:

Edytowane przez xDuffie
  • Super 7
  • Dzięki! 1
Odnośnik do komentarza

Zarejestruj się za darmo i naucz się zarabiać online!

  • Dostęp do darmowych poradników pokazujących krok po kroku jak zarabiać w Internecie
  • Sposoby zarabiania niepublikowane nigdzie indziej
  • Aktywna społeczność, która pomoże Ci rozwiązać problemy i doradzi
  • Profesjonalne treści na temat SEO, social media, afiliacji, kryptowalut, sztucznej inteligencji i wiele więcej!
xDuffie

xDuffie

Opublikowano
  • Autor
Opublikowano

Wow dzięki! Bardzo się przyda :D

Mega + dla ciebie za chęci i za wykonanie poradnika!

To cię cieszę, że moja robota nie poszła na marne.

Zawsze sobie zapisuje przydatne kody do VB w jakimś dokumencie tekstowym, a projekty 'bazowe' zapisuję w tym samym miejscu, więc napisanie tutaj poradnika zajęło mi max 15 minut, bo kody wystarczyło powklejać i porobić gify. :D

Odnośnik do komentarza
  • 2 lata później...
rajza

rajza

Opublikowano
Opublikowano

Przepraszam za odkop. Rajza bierze się za fake appke i tego potrzebuję i nie działa. Mam tak: 

Public Class Form1

    Private Sub MephProgressBar2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MephProgressBar2.Click

    End Sub

   

    Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged

    End Sub

    

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

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



    Public Sub Timer1_Tick_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If MephProgressBar2.Value = 15 Then RichTextBox1.Text = RichTextBox1.Text & "Loading jakiśtam2.dll..." & vbCrLf
        If MephProgressBar2.Value = 25 Then RichTextBox1.Text = RichTextBox1.Text & "Loading jakiśtam4.dll..." & vbCrLf
        If MephProgressBar2.Value = 45 Then RichTextBox1.Text = RichTextBox1.Text & "Loading 7567567..." & vbCrLf
        If MephProgressBar2.Value = 55 Then RichTextBox1.Text = RichTextBox1.Text & "Loading Lollol.dll..." & vbCrLf
        If MephProgressBar2.Value = 80 Then RichTextBox1.Text = RichTextBox1.Text & "Można wpisywać co się chce" & vbCrLf
        If MephProgressBar2.Value = 86 Then RichTextBox1.Text = RichTextBox1.Text & "BlaBlabla" & vbCrLf
        If MephProgressBar2.Value = 95 Then RichTextBox1.Text = RichTextBox1.Text & "Make-cash.pl" & vbCrLf
    End Sub
End Class

I nie działa. Po kliknięciu nic sie nie dzieje

                                           1839232079_seo.png.55086169b3289bd58df5c1a319c9369d.png                                                                                     

Odnośnik do komentarza
Paweł

Paweł

Opublikowano
Opublikowano
1 minutę temu, rajza napisał:

Zła struktura kodu. Każdy if musi mieć zakończenie.

Spróbuj podmienić kod w timerze na ten. Przerobiony na sucho więc mogą się pojawić błędy.

Cytuj 

If MephProgressBar2.Value = 15 Then 
RichTextBox1.Text = RichTextBox1.Text & "Loading jakiśtam2.dll..." & vbCrLf
end if
If MephProgressBar2.Value = 25 Then 
RichTextBox1.Text = RichTextBox1.Text & "Loading jakiśtam4.dll..." & vbCrLf
end if
If MephProgressBar2.Value = 45 Then 
RichTextBox1.Text = RichTextBox1.Text & "Loading 7567567..." & vbCrLf
end if

If MephProgressBar2.Value = 55 Then 
RichTextBox1.Text = RichTextBox1.Text & "Loading Lollol.dll..." & vbCrLf
end if
If MephProgressBar2.Value = 80 Then 
RichTextBox1.Text = RichTextBox1.Text & "Można wpisywać co się chce" & vbCrLf
end if
If MephProgressBar2.Value = 86 Then 
RichTextBox1.Text = RichTextBox1.Text & "BlaBlabla" & vbCrLf
end if
If MephProgressBar2.Value = 95 Then 
RichTextBox1.Text = RichTextBox1.Text & "Make-cash.pl" & vbCrLf
end if

W sumie to można zamknąć w jednym IF , wystarczy że każdy IF zamienisz na ELSEIF i usuniesz wszystkie end if oprócz ostatniego (i tak powinno być ale powższy kod też powinien działać.

  • Super 1
Odnośnik do komentarza
rajza

rajza

Opublikowano
Opublikowano
5 minut temu, Szmigol napisał:

Zła struktura kodu. Każdy if musi mieć zakończenie.

Dzięki wielkie! Nie wypluwa błedu aczkolwiek nadal skrypt nie działa ;s 

Po kliknieciu w button nic się nie dzieje. Progress bar nie rosnie i teksty sie nie pojawiają

                                           1839232079_seo.png.55086169b3289bd58df5c1a319c9369d.png                                                                                     

Odnośnik do komentarza
rajza

rajza

Opublikowano
Opublikowano
1 minutę temu, Szmigol napisał:

Powiedz mi co ma robić ten kod to od zera napisze.

ProgressBar z jakiejś skórki. Jeden ciul, może i być podstawowy, chciałem by ładniej wyglądało po prostu. Co ma robić?

Klikasz na button, zaczyna lecieć progress bar (fajnie jak można to opóźnić na kilkanascie/kilka sekund) i linijka pod linijką przy danym % pokazuje się jakieś info. Najlepiej jeszcze żeby na końcu wyskakiwał komunikat :D Ale może też to być w nowym formie, a to już mogę sobie ogarnąć. Po prostu żeby przy 99% wyskakiwał jakiś komunikat no albo przechodziło do nowego formu :P

Dzięki z góry

                                           1839232079_seo.png.55086169b3289bd58df5c1a319c9369d.png                                                                                     

Odnośnik do komentarza
  • 3 tygodnie później...
coffee

coffee

Opublikowano
Opublikowano (edytowane)

Zrobiłem ulepszoną wersję. Tutaj tekst jest pobierany z pliku. Ponadto dostosowuje się to do długości progressBara. Jeśli chcemy, by wyświetlały się tylko 2 linijki to zostaną one wyświetlone dokładnie w połowie i na końcu progressBara. Jeśli ma być 200 linijek, to po prostu co każdy punkcik progressBara będą się wyświetlały (200/maximum progressbara) linijki itd.

Oczywiście w fake aplikacji plik znajdowałby się na serwerze, dzięki czemu w każdej chwili byśmy mogli zmienić tekst.

2853c89db6.gif

namespace Fake_app {
    public partial class Form1 : Form {
        private string[] info;
        private int displayedInfoIndex;
        private double displayCounter;
        private double displayInterval;

        public Form1() {
            InitializeComponent();
            setup();
        }

        private void setup() {
            displayedInfoIndex = 0;
            displayCounter = 0;
            info = GetFakeInfo();
            displayInterval = (double)progressBar1.Maximum / (double)info.Length;
            displayCounter = displayInterval;
        }

        private void timer1_Tick(object sender, EventArgs e) {
            while (progressBar1.Value >= (int)displayCounter) {
                displayCounter += displayInterval;
                AddFakeLine(info[displayedInfoIndex++]);
            }
            if (progressBar1.Value == 100)
                timer1.Stop();

            progressBar1.Increment(1);
        }

        private string[] GetFakeInfo() {
            return File.ReadAllLines("info.txt");
        }

        private void button1_Click(object sender, EventArgs e) {
            reset();
            setup();
            timer1.Start();
        }

        private void reset() {
            timer1.Stop();
            progressBar1.Value = 0;
            richTextBox1.Text = "";
        }

        private void AddFakeLine(string val) {
            if (richTextBox1.Lines.Count() != info.Length)
                richTextBox1.Text += val + Environment.NewLine;
            else
                richTextBox1.Text += val;
        }
    }
}
Edytowane przez coffee
  • Super 2
Odnośnik do komentarza
  • 2 miesiące temu...
Pan Inwestor

Pan Inwestor

Opublikowano
Opublikowano

@coffee wklejam cały kod do nowego dokumentu (jego początkową zawartość usuwam) i wywala takie błędy: 

Ważność	Kod	Opis	Projekt	Plik	Wiersz	Stan pominięcia
Błąd	BC30626	Instrukcja Namespace musi być zakończona odpowiadającą jej instrukcją End Namespace.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	1	Aktywne
Błąd	BC30205	Oczekiwano końca instrukcji.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	1	Aktywne
Błąd	BC30481	Instrukcja Class musi być zakończona odpowiadającą jej instrukcją End Class.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	2	Aktywne
Błąd	BC30188	Oczekiwano deklaracji.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	2	Aktywne
Błąd	BC30183	Słowo kluczowe nie jest prawidłowe jako identyfikator.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	3	Aktywne
Błąd	BC30203	Oczekiwano identyfikatora.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	3	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	3	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	4	Aktywne
Błąd	BC30183	Słowo kluczowe nie jest prawidłowe jako identyfikator.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	5	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	5	Aktywne
Błąd	BC30183	Słowo kluczowe nie jest prawidłowe jako identyfikator.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	6	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	6	Aktywne
Błąd	BC30205	Oczekiwano końca instrukcji.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	8	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	9	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	10	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	11	Aktywne
Błąd	BC30205	Oczekiwano końca instrukcji.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	13	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	14	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	15	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	16	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	17	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	18	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	19	Aktywne
Błąd	BC30205	Oczekiwano końca instrukcji.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	21	Aktywne
Błąd	BC30689	Instrukcja nie może wystąpić poza treścią metody.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	22	Aktywne
Błąd	BC30198	Oczekiwano znaku „)”.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	22	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	23	Aktywne
Błąd	BC30034	Identyfikator ujęty w nawiasy kwadratowe nie ma nawiasu zamykającego ].	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	24	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	24	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	24	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	25	Aktywne
Błąd	BC30689	Instrukcja nie może wystąpić poza treścią metody.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	26	Aktywne
Błąd	BC30201	Oczekiwano wyrażenia.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	26	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	27	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	29	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	30	Aktywne
Błąd	BC30183	Słowo kluczowe nie jest prawidłowe jako identyfikator.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	32	Aktywne
Błąd	BC30203	Oczekiwano identyfikatora.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	32	Aktywne
Błąd	BC30689	Instrukcja nie może wystąpić poza treścią metody.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	33	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	33	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	34	Aktywne
Błąd	BC30205	Oczekiwano końca instrukcji.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	36	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	37	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	38	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	39	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	40	Aktywne
Błąd	BC30205	Oczekiwano końca instrukcji.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	42	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	43	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	44	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	45	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	46	Aktywne
Błąd	BC30205	Oczekiwano końca instrukcji.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	48	Aktywne
Błąd	BC30689	Instrukcja nie może wystąpić poza treścią metody.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	49	Aktywne
Błąd	BC30203	Oczekiwano identyfikatora.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	49	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	50	Aktywne
Błąd	BC30689	Instrukcja nie może wystąpić poza treścią metody.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	51	Aktywne
Błąd	BC30037	Znak jest nieprawidłowy.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	52	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	53	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	54	Aktywne
Błąd	BC30035	Błąd składni.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	55	Aktywne
Błąd	BC30260	Element „void” jest już zadeklarowany jako „Private void As Object” w tym elemencie class.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	21	Aktywne
Błąd	BC30260	Element „void” jest już zadeklarowany jako „Private void As Object” w tym elemencie class.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	36	Aktywne
Błąd	BC30260	Element „void” jest już zadeklarowany jako „Private void As Object” w tym elemencie class.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	42	Aktywne
Błąd	BC30260	Element „void” jest już zadeklarowany jako „Private void As Object” w tym elemencie class.	WindowsApp1	C:\Users\XPS 15\AppData\Local\Temporary Projects\WindowsApp1\Form1.vb	48	Aktywne

iwi.pl - blog o inwestowaniu przez internet    |    zwi.pl - blog o zarabianiu przez internet 

 

Odnośnik do komentarza

Jeśli chcesz dodać odpowiedź, zaloguj się lub zarejestruj nowe konto

Jedynie zarejestrowani użytkownicy mogą komentować zawartość tej strony.

Zarejestruj nowe konto

Załóż nowe konto. To bardzo proste!

Zarejestruj się

Zaloguj się

Posiadasz już konto? Zaloguj się poniżej.

Zaloguj się
Tematy

  • Polecana zawartość

    • Poradnik podatkowy - jak rozliczać się z pieniędzy zarobionych przez Internet bez DG?

      Poradnik podatkowy - jak rozliczać się z pieniędzy zarobionych przez Internet bez DG?

      mysc opublikował(a) temat w Podatki, prawo, własna firma,

      Zarabianie w Internecie wiąże się z koniecznością płacenia podatków - a rozliczanie się z urzędem skarbowym nie jest jednoznaczne i proste. Prawo podatkowe w Polsce jest nieujednolicone - co oznacza, że każdy urząd skarbowy może mieć inne interpretacje. Sprawdź jak się za to zabrać!
        • Lubię to!
        • Super
      • 12 odpowiedzi
      mysc

      Wybrany przez

      mysc,
    • JDG - Jak zarejestrować, rozliczać i prowadzić działalność gospodarczą w Polsce

      JDG - Jak zarejestrować, rozliczać i prowadzić działalność gospodarczą w Polsce

      mysc opublikował(a) temat w Podatki, prawo, własna firma,

      Jednoosobowa działalność gospodarcza (JDG) to najprostsza forma prowadzenia działalności gospodarczej w Polsce. Jest to działalność prowadzona przez jedną osobę fizyczną na własne nazwisko i na własne ryzyko. Jednak mimo, że nazywa się jednoosobowa - daje jednak możliwość zatrudniania pracowników. Takich firm jest zarejestrowanych w Polsce zdecydowanie najwięcej. Sprawdź jak zarejestrować, rozliczać i prowadzić własną JDG!
        • Super
      • 3 odpowiedzi
      mysc

      Wybrany przez

      mysc,
    • Inwestowanie w obligacje detaliczne skarbu państwa - od podstaw!

      Inwestowanie w obligacje detaliczne skarbu państwa - od podstaw!

      mysc opublikował(a) temat w Inwestowanie i oszczędzanie,

      Sprawdź jak inwestować w obligacje skarbowe - krok po kroku! Detaliczne obligacje skarbowe to rodzaj obligacji emitowanych przez Państwo, które są oferowane indywidualnym inwestorom, takim jak osoby fizyczne, a nie instytucjom finansowym.

      Są to instrumenty dłużne, nienotowane na żadnym rynku, co oznacza że kupując taką obligację, w praktyce pożyczasz pieniądze państwu na określony czas, a w zamian otrzymujesz odsetki. Można więc powiedzieć że obligacje są indywidualną pożyczką na określony % dla Skarbu Państwa. Państwo odda Ci więcej niż od Ciebie pożyczyło.
        • Super
      • 7 odpowiedzi
      mysc

      Wybrany przez

      mysc,
    • Jak pozyskiwać i zarabiać na poleconych dzięki make-cash.pl

      Jak pozyskiwać i zarabiać na poleconych dzięki make-cash.pl

      mysc opublikował(a) temat w Poradniki CPA,

      W tym poradniku przedstawiam możliwości dostępne dla każdego użytkownika. Dowiesz się jak efektywnie wykorzystać forum do zbierania poleconych i budowania dodatkowych zysków.

      Make-cash.pl to miejsce, gdzie ludzie dzielą się swoimi doświadczeniami, poszukują porad i rekomendacji, a także nawiązują wartościowe kontakty. Codziennie odwiedza nas minimum 2000 unikalnych osób, które są zainteresowane zarabianiem przez Internet - a to ogromny potencjał, z którego może korzystać nie tylko administracja - ale każdy użytkownik forum !
        • Super
      • 2 odpowiedzi
      mysc

      Wybrany przez

      mysc,
    • Jak pisać treści na stronę internetową z wykorzystaniem AI

      Jak pisać treści na stronę internetową z wykorzystaniem AI

      Wujek Ziemny opublikował(a) temat w Case Study i Poradniki SEO,

      Tworzenie treści od podstaw może być procesem czasochłonnym. Istnieje wiele mniejszych kroków, o których należy pomyśleć w drodze do stworzenia atrakcyjnych treści, takich jak badanie rynku, SEO i redagowanie tekstu, a to tylko początek. Jednak nie musisz zaczynać od zera, gdy istnieją narzędzia AI, które mogą pomóc w tworzeniu wysokiej jakości treści. 
        • Dzięki!
        • Super
      • 13 odpowiedzi
      Ciamciaj

      Wybrany przez

      Ciamciaj,
    Wyświetl wszystko
×
×
  • Dodaj nową pozycję...

Powiadomienie o plikach cookie

Ta strona korzysta z ciasteczek, aby świadczyć usługi na najwyższym poziomie. Dalsze korzystanie z witryny oznacza zgodę na ich wykorzystanie. Polityka prywatności .

  Akceptuję