VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Changes the color of the form's backcolor. Very simple code to follow.

by Alexander Drankus (3 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sun 26th November 2000
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Changes the color of the form's backcolor. Very simple code to follow.

API Declarations


'Student @ DeVry-Chicago
'Sunday, November 26, 2000
Dim intCount As Integer
'You only need a timer on your form, "Timer1"

Rate Changes the color of the form's backcolor. Very simple code to follow.



    Timer1.Interval = 10
    intCount = 1
End Sub

Private Sub Timer1_Timer()
    If intCount = 1 Then
        Me.BackColor = &HFFFFFF
        intCount = intCount + 1
        Exit Sub
    ElseIf intCount = 2 Then
        Me.BackColor = &HE0E0E0
        intCount = intCount + 1
        Exit Sub
    ElseIf intCount = 3 Then
        Me.BackColor = &HC0C0C0
        intCount = intCount + 1
        Exit Sub
    ElseIf intCount = 4 Then
        Me.BackColor = &H808080
        intCount = intCount + 1
        Exit Sub
    ElseIf intCount = 5 Then
        Me.BackColor = &H404040
        intCount = intCount + 1
        Exit Sub
    ElseIf intCount = 6 Then
        Me.BackColor = &H0&
        intCount = 1
        Exit Sub
    End If
End Sub

Download this snippet    Add to My Saved Code

Changes the color of the form's backcolor. Very simple code to follow. Comments

No comments have been posted about Changes the color of the form's backcolor. Very simple code to follow.. Why not be the first to post a comment about Changes the color of the form's backcolor. Very simple code to follow..

Post your comment

Subject:
Message:
0/1000 characters