How to bind the data to a datagrid

I have the following i am able to see the data under reponse.write, please can you help me bind the data to a datagrid(datagrid1)

result1 = myobj.getSubCategoryList("MOT-V300", "GSM", "jamaica", 294, 1, 1)
Dim i As Integer

For i = 0 To result1.results.GetLength(0) - 1
With result1.results(i)
Response.Write(.description)
Response.Write(.fatherId)
Response.Write(.id())
Response.Write(.lastLevel())
Response.Write(.orderBy())
Response.Write(.systemcat())
End With
Next

Thank you very much for the information.

You need to bind the datagrid to something. Why don't you take your object and write it out to a datatable with columns defined for each of your object fields and bind the datagrid to that?

Show getSubCategoryList()