listview图标顺序保存的问题

偶用listview+imagelist导入并显示了图标,然后手工拖动来改变了图标的排列顺序，可不知该如何按当前图标排列的顺序来保存。
网上说的保存方法大多是
For i = 1 To ListView2.ListItems.Count
filed = ListView2.ListItems(i).text
Print #1, filedNext i
Close #1
可这样保存出来的顺序还是原始顺序啊。
我拖动后看了一下，图标的index并没有改变还是原始的，所以导至保存时顺序也是原始的。
偶想保留的是当时的排列顺序，还望高手指点。