[C&P] Making your form change colors!

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim Colors() = {"RED", "BLUE", "ORANGE", "PINK", "GREEN", "YELLOW"}
        Dim Color
        Color = CInt(Int(6 * Rnd()))
        Colorgraber = CStr(Colors(Color))
        Color = Colorgraber
        If Colorgraber = "RED" Then
            Me.BackColor = Drawing.Color.Red
        ElseIf Colorgraber = "BLUE" Then
            Me.BackColor = Drawing.Color.Blue
        ElseIf Colorgraber = "ORANGE" Then
            Me.BackColor = Drawing.Color.Orange
        ElseIf Colorgraber = "PINK" Then
            Me.BackColor = Drawing.Color.Pink
        ElseIf Colorgraber = "GREEN" Then
            Me.BackColor = Drawing.Color.Green
        ElseIf Colorgraber = "YELLOW" Then
            Me.BackColor = Drawing.Color.Yellow
        End If
End Sub