Options renklendirme

[ocamsul]

Arkadaşlar merhabalar. Benim yapmak istediğim; Optıonsun üzerine Mouse ile gelindiğinde renk değiştirsin, ayrılınca eski renginde kalsın. bunu nasıl sağlarım.

 

[Kemal Demir]

Private Sub OptionButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
OptionButton1.BackColor = RGB(255, 50, 200)
End Sub
Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
OptionButton1.BackColor = RGB(150, 80, 255)
End Sub

RGb kodlarını kendinize göre uyarlayınız.

 

[ocamsul]

SN: Rakkas Üsdat çok teşekkür ederim.