How to get the data from selected row QTP?

Dim webElement, childAttrib, tableRow
Set webElement= Browser(<"Browser">).Page(<"Page">).WebTable(<"WebTable">).Object.getElementsByTagName("TR")
tableRow= Browser(<"Browser">).Page(<"Page">).WebTable(<"WebTable">).RowCount
For i=1 to tableRow-1
Set childAttrib= webElement(i).attributes
Print childAttrib("class").value
Next

More Info:
http://developer.mozilla.org/En/DOM:document.getElementsByTagName