Commandbutton rengi değiştirme.

[seddur]

Arkadaşlar commanbutton1'e tıklayarak Listbox1'e veri giriyorum.Yapmak istediğim veri girmek için commandbutton'a tıkladığımda rengi değişsin daha sonra listbox1'deki veriyi silince tekrar eski rengine dönsün.İlgilenecek arkadaşa teşekkürler.

 

[Seyit Tiken]

Bu şekilde kendinize göre revize ediniz.

Private Sub CommandButton1_Click()
If Me.CommandButton1.Caption = "Listeye Veri Getir" Then
MsgBox "1.Kodunuz"
Me.CommandButton1.BackColor = &H8080FF
Me.CommandButton1.Caption = "Listeyi Sil"
Else
MsgBox "2.Kodunuz"
Me.CommandButton1.BackColor = &H8000000F
Me.CommandButton1.Caption = "Listeye Veri Getir"
End If
End Sub

 

[seddur]

Kodu bir comandbuttonda bir de checkboxda ayrı ayrı kullandım istediğim gibi sonuç verdi.Teşekkür ederim.

 

[fehdur]

.