Solved

Endless Looping of your name..with changing of Font color

Posted on 2012-04-09
7
18 Views
Last Modified: 2016-06-23
I'm trying to make is so that a Name located in lblName...will be continually changing the color of the Font Letter  in order when I click the Form1

So click Form1

The Name will be Red, Click again Name will be in White, Click again Name will be Blue , click again Name will be Purple, click again the Name will be Orange, and the process startes all over again..

What am i doing wrong here...? should I have have

 For Num > 4 Then Num = 0
        Me.lbl.Name = MyColors(Num)

Here is the code...hopefully somebody can help


Public Class Form1
    Dim MyColors(2) As Color 'Global
    Dim Num As Integer 'Global, automatically initialized to 0

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As  _
            System.EventArgs) Handles MyBase.Load
        MyColors(0) = Color.Red
        MyColors(1) = Color.White
        MyColors(2) = Color.Blue
        MyColors(3) = Color.Purple
        MyColors(4)= Color.Orange
    End Sub 'Form1_Load

    Private Sub Form1_MouseClick(ByVal sender As Object, ByVal e As  _
            System.Windows.Forms.MouseEventArgs) Handles Me.MouseClick
        Num = Num + 1
         IF Num > 4 Then Num = 0
        Me.lbl.Name = MyColors(Num)
     
    End Sub 'Form1_MouseClick
End Class
0
Comment
Question by:annie8508
  • 2
7 Comments
 
LVL 69

Accepted Solution

by:
Éric Moreau earned 500 total points
ID: 37823776
this line:
Dim MyColors(2) As Color 'Global

should read:
Dim MyColors(4) As Color 'Global
0
 
LVL 45

Expert Comment

by:aikimark
ID: 37823949
You can also use modular division to loop the index through the five color values.
Example:
Num = (Num +1) Mod 5

Open in new window

0
 
LVL 83

Expert Comment

by:CodeCruiser
ID: 37832955
Change

IF Num > 4 Then Num = 0

to

IF Num >=0 4 Then Num = 0
0
 
LVL 69

Expert Comment

by:Éric Moreau
ID: 41667596
0

Featured Post

How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

Join & Write a Comment

Creating an analog clock UserControl seems fairly straight forward.  It is, after all, essentially just a circle with several lines in it!  Two common approaches for rendering an analog clock typically involve either manually calculating points with…
It was really hard time for me to get the understanding of Delegates in C#. I went through many websites and articles but I found them very clumsy. After going through those sites, I noted down the points in a easy way so here I am sharing that unde…
Learn how to match and substitute tagged data using PHP regular expressions. Demonstrated on Windows 7, but also applies to other operating systems. Demonstrated technique applies to PHP (all versions) and Firefox, but very similar techniques will w…
Explain concepts important to validation of email addresses with regular expressions. Applies to most languages/tools that uses regular expressions. Consider email address RFCs: Look at HTML5 form input element (with type=email) regex pattern: T…

707 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

20 Experts available now in Live!

Get 1:1 Help Now