Working with WebCheckBox

'============= Ways to select value from WebCheckBox=======================

Browser("name:=Google Advanced Search").Page("title:=Google Advanced Search").WebCheckBox("name:=lr").Set"ON"
Browser("name:=Google Advanced Search").Page("title:=Google Advanced Search").WebCheckBox("name:=lr").Set "OFF"

'========== To Count Number of WebCheckBox in a Page Using Mic Class =================

Set oWebCheckBox=Description.Create
oWebCheckBox("micclass").value="WebCheckBox"
set objCheckBox=Browser("name:=Google Advanced Search").Page("title:=Google Advanced Search").ChildObjects(oWebCheckBox)
vrCount = objCheckBox.Count

For i=0 to vrCount-1
msgbox objCheckBox(i).GetROProperty("name")
Next