Koristi nekakvu petlju u popunjavanju grida
u vb bi to ovako moglo ici...pisem kod napamet pa su moguce greske
dim iCount as integer=ds.table(1).rows.count
dim i as integer=0
dim j as integer=30
sub subClickNext
for i=0 to j
msgbox(ds.table(1).row(i).column(0)
end for
i=i+30
j=j+30
end sub