❓ [Help]Random Color Background[Solved]

Posts 16–20 of 20 · Page 2 of 2
^^Is that all the disco thing is or does it do more?

EDIT: And what colors do you think are the best?
well do you want it to do more. you could make text show up over it like Congrats or something. Let me know if you want that code?

use bright colors
Yeah I would love the code if you can get it.

Mods - Sorry for hijacking this thread
Ok let me get it up. give me just a sec.

nextgen is cool about it, aslong as this doesnt turn into spam

--------

Here you go, i made it so may be alittle buggy

Dim g As Graphics
Dim theBrush As New Drawing2D.HatchBrush(Drawing.Drawing2D.HatchStyle. Plaid, Color.DarkBlue, Color.Aqua)
Dim theFont As New Font("Arial", 60)
g = Me.CreateGraphics
g.DrawString("Test", theFont, theBrush, 40, 190)

you can change around the variables and stuff
Nice, but here is a good if not the best disco lighting program
Just loop through 1 to 255 and convert the values to colors

Code:
For i As Integer = 1 To 255

            Me.BackColor = Color.FromArgb(255, Rnd() * i, Rnd() * i, Rnd() * i)

            Application.DoEvents()
'Control the speed here...
            System.Threading.Thread.Sleep(20)
        Next

'Reset the color to whatever it was....for example gray 
        Me.BackColor = Color.Gray
Posts 16–20 of 20 · Page 2 of 2
This thread is closed for replies.

Similar Threads

Tags for this Thread

None

Talk with us