CssClass

I wish to change the css when I click a button. How can I do that? I've tried the following code without any luck.

Code:

---

sub clickButton()
  txtTest.CssClass = "newText"
end sub

---

where newText is the CssClass