这个可能没有办法，如果数据量不是特别大，某天加载所有数据：
dim drs as list(of datarow) = datatables("xxxx").Select("","_sortKey")
for i as integer= 0 to drs.count -1
drs(i).baserow(“_sortkey”) = i
next
加好友 
发短信
Post By：2013/11/9 8:46:00 [只看该作者]
