• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Create the color pallet

Create the color pallet

Create the color pallet

Rate Create the color pallet

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Label1.Visible = True
Label2.Visible = True
Label3.Visible = True
Label4.Visible = True
Label5.Visible = True
Label6.Visible = True
Label7.Visible = True
Label8.Visible = True
Label9.Visible = True
Label10.Visible = True
Label11.Visible = True
Label12.Visible = True
Label13.Visible = True
Label14.Visible = True
Label15.Visible = True
Label16.Visible = True
Label17.Visible = True
Label18.Visible = True
Label19.Visible = True
Label20.Visible = True

End Sub

Private Sub Label1_Click()
Label21.BackColor = Label1.BackColor
Label1.Visible = False
End Sub

Private Sub Label10_Click()
Label21.BackColor = Label10.BackColor
Label10.Visible = False
End Sub

Private Sub Label11_Click()
Label21.BackColor = Label11.BackColor
Label11.Visible = False
End Sub

Private Sub Label12_Click()
Label21.BackColor = Label12.BackColor
Label12.Visible = False
End Sub

Private Sub Label13_Click()
Label21.BackColor = Label13.BackColor
Label13.Visible = False
End Sub

Private Sub Label14_Click()
Label21.BackColor = Label14.BackColor
Label14.Visible = False
End Sub

Private Sub Label15_Click()
Label21.BackColor = Label15.BackColor
Label15.Visible = False
End Sub

Private Sub Label16_Click()
Label21.BackColor = Label16.BackColor
Label16.Visible = False
End Sub

Private Sub Label17_Click()
Label21.BackColor = Label17.BackColor
Label17.Visible = False
End Sub

Private Sub Label18_Click()
Label21.BackColor = Label18.BackColor
Label18.Visible = False
End Sub

Private Sub Label19_Click()
Label21.BackColor = Label19.BackColor
Label19.Visible = False
End Sub

Private Sub Label2_Click()
Label21.BackColor = Label2.BackColor
Label2.Visible = False
End Sub

Private Sub Label20_Click()
Label21.BackColor = Label20.BackColor
Label20.Visible = False
End Sub

Private Sub Label3_Click()
Label21.BackColor = Label3.BackColor
Label3.Visible = False
End Sub

Private Sub Label4_Click()
Label21.BackColor = Label4.BackColor
Label4.Visible = False
End Sub

Private Sub Label5_Click()
Label21.BackColor = Label5.BackColor
Label5.Visible = False
End Sub

Private Sub Label6_Click()
Label21.BackColor = Label6.BackColor
Label6.Visible = False
End Sub

Private Sub Label7_Click()
Label21.BackColor = Label7.BackColor
Label7.Visible = False
End Sub

Private Sub Label8_Click()
Label21.BackColor = Label8.BackColor
Label8.Visible = False
End Sub

Private Sub Label9_Click()
Label21.BackColor = Label9.BackColor
Label9.Visible = False
End Sub