ist ganz einfach
bei einigen controls wie Command-Buttons, Frames usw. kann mit BackColor die Farbe eingestellt werden.

Code:
Public farbe As Byte



Private Sub Form_Load()

 farbe = 2



Select Case farbe
    Case 0
    Command1.BackColor = vbButtonFace
    Case 1
    Command1.BackColor = vbRed
    Case 2
    Command1.BackColor = vbYellow
    End Select
End Sub
Command Buttons müssen vorher in den Properties auf "Style" Grafisch eingestellt werden, sonst werden keine Farben angezeigt.

LukAs hat die Buttons wohl aus mehreren Teilen zusammengesetzt.
Ist arbeitsintensiver, sieht aber auch besser aus.
Man kann statt der Farben auch ein Picture über den Knof legen und das je nach "Schaltzustand" austauschen.

Gruß
Christopher