For Loop in QTP

Sample Code:

Dim rowcount
for i=1 to rowcount
Datatable.SetCurrentRow(i)
'--- Code here
Next

Cheers!!!