Tryb drzewa | Tryb normalny

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ę

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

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

comanche Stały Bywalec Liczba postów: 729 Dołączył: Jun 2012 Reputacja: 89 Forum Gold: 1.00	Post: #2 RE: Problem z Visual Basic Problem rozwiazany
23-09-2013, 10:12

Matty094 Aktywny Liczba postów: 223 Dołączył: Mar 2013 Reputacja: 64 Forum Gold: 0.00	Post: #3 RE: Problem z Visual Basic Potwierdzam Comanche mi pomógł ,jak ktoś chce rozwiązanie to mogę podać
23-09-2013, 10:53

v3XeR Uzależniony Liczba postów: 1,449 Dołączył: Aug 2012 Reputacja: 198 Forum Gold: 126.00	Post: #4 RE: Problem z Visual Basic Taki mały offtop - czy da się robić apki do androida w Visual Basic ?
23-09-2013, 13:47

Masterjam Bywalec Liczba postów: 294 Dołączył: Nov 2012 Reputacja: 41 Forum Gold: 0.00	Post: #5 RE: Problem z Visual Basic (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ę
23-09-2013, 13:54