Tigri,
Si fillim shiko tek "properties" te butonit nqs ke "forecolor". Kjo eshte ngjyra e teksit te butonin. E di qe eshte ne VBA por me duket se nuk eshte ne VB.
Nqs nuk e ke "forecolor" mund te perdoresh nje "optionbutton". "Optionbutton" jane butonat qe qendrojne te shtypur kur ti klikon mbi ta. Pra zevendesoje "commandbutton" me "optionbutton" dhe tek "onclick" e butonit vere statusin "false" qe te mos qendroje i shtypur. Keta butona lejojne ndryshimin e ngjyres se tekstit.
Fut nje buton (optionbutton) te ri me emrin "butoni"
Pastaj shkruaj kete kod:
Kodi:
Private Sub butoni_Click()
'e bejme false qe te mos ngelet i shtypur
Me!butoni = False
'ndryshojme ngjyren e tekstit ne te kuqe
Me!butoni.ForeColor = 255
MsgBox "ti shtype butonin"
'ketu mund te vesh kod tjeter
End Sub
Menyra tjeter eshte ajo qe te ka shpjeguar Force Intruder duke vene nje grafik ne buton. Gjithashtu mund te vesh nje grafik dhe mbi grafikun mund te vendosesh nje buton te tejdukshem (transparent).
Krijoni Kontakt