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.

Matty094 · 23-09-2013 08:24

Cześć mam taki kod od rockndrug'a :

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

            Select Case key

                Case 1

            End Select

            MessageBox.Show("Please check your gold in-game", "Success")

        Else

            If ProgressBar1.Value = 1 Then

                Label7.Text = "Loading.."

            End If

            If ProgressBar1.Value = 15 Then

                Label7.Text = "Detect Device"

            End If

            If ProgressBar1.Value = 25 Then

                Label2.Text = "Android 4.0.1"

            End If

            If ProgressBar1.Value = 45 Then

                Label7.Text = "Connected!"

            End If

            If ProgressBar1.Value = 55 Then

                Label7.Text = "Searching character on selected server.."

            End If

            If ProgressBar1.Value = 80 Then

                Label7.Text = "Characted found!"

            End If

            If ProgressBar1.Value = 86 Then

                Label7.Text = "Transfer ALZ to character.."

            End If

            If ProgressBar1.Value = 95 Then

                Label7.Text = "Success!"

            End If

        End If

    End Sub

I właśnie chodzi o to jak zrobić takie coś ,żeby podczas Android 4.0.1 z czerwonego koloru tekstu zmieniło się na zielony .

comanche · 23-09-2013 10:12

Problem rozwiazany Smile

Matty094 · 23-09-2013 10:53

Potwierdzam Comanche mi pomógł ,jak ktoś chce rozwiązanie to mogę podać Smile

v3XeR · 23-09-2013 13:47

Taki mały offtop - czy da się robić apki do androida w Visual Basic ?

Masterjam · 23-09-2013 13:54

(23-09-2013 10:53)Matty094 napisał(a): Potwierdzam Comanche mi pomógł ,jak ktoś chce rozwiązanie to mogę podać

Jeśli nikt nie zastrzegł prawami autorskimi , to chętnie , przyda się Smile

Matty094 · 23-09-2013 14:25

To podaję rozwiązanie Smile

Otóż jeżeli mamy w kodzie :

Kod:

If ProgressBar1.Value = 1 Then

                Label7.Text = "Loading.."

            End If

To jeszcze musimy dołożyć :

Label2.ForeColor = Color.Red

Powinno być tak :

Kod:

If ProgressBar1.Value = 1 Then

                Label7.Text = "Loading.."

                Label7.ForeColor = Color.Red

            End If

W miejsce color wstawiamy nazwę koloru po angielsku np. green , Yellow .
I Program sam zmieni nam kolor z czerwonego na zielony Big Grin

Może trochę byle jak tłumaczę ,ale jak ktoś czegoś nie rozumie to zapraszam na PW chętnie pomogę Jerk

2

Podobne wątki
Wątek:		Autor	Odpowiedzi:	Wyświetleń:	Ostatni post
	Błąd przy wczytywaniu projektu Visual Studio C#	czesiuleczek	3	6,681	31-01-2018 20:03 Ostatni post: unluckyunit
	Error Box po upływie czasu w Visual Basic	sh4kr	2	5,456	05-12-2016 15:27 Ostatni post: shf
	Visual Basic	Wiktor220	0	4,752	12-06-2016 12:51 Ostatni post: Wiktor220
	Wersja Visual Basic	Ravtis	0	4,871	13-02-2016 11:34 Ostatni post: Ravtis
	visual basic c#	jacektw	1	3,724	04-12-2015 19:40 Ostatni post: bedi25

Tryb drzewa \| Tryb normalny Problem z Visual Basic » Problem z Visual Basic
Autor	Wiadomość