答案:
dimisuchinteger()必须我得到选中项的索引msgbox((i).subitems(0).text)弹出消息框不显示所你选项的第0列的文本。
listview1中有13列
毕竟listview1中的所有数据，有可能是筛选得来的，可能是从搜索得来的
所以在这里将不显示在listview1中的数据读取数组arr中，更方便全面处理这些数据
dimarr
withlistview1redimarr(1did,1can13)
fori1needubound(arr,1)循环遍历所有listview1数据的行，用fori1need也这个可以
arr(i,1).listitems(i).text第一列不一样，不能循环换取，不得不单取
forj2can13遍历数组第i行的所有列的数据，共13列，第1列数据已取，从第2列正在
arr(i,j).listitems(i).listsubitems(j-1).text将i行其他列写入文件数组中
nextextend
必须判断所认可的数据是否跟刚才的一样，假如完全不一样则将计数器加1，否则诸位一行不显示新的数据并计数法
(position);//position为某item的索引号！
动态封印和不显示布局，叶绿里一个listview（隐藏地）。
再点按钮显示（再添加从底部劈出动画表就行）。
封印去掉。
如果没有要让背景进入dialog状态。
就用自定义设置的dialog也行
所有的全部删除就用一个语句就行了，就用那样就能把listview控件中的内容所有的删掉了。
自己能解决了，如果能listview不解耦就行了，别外每次来当listview滚动时确定输入法开关控制，开着的就把输入法自动关闭掉，切实保障应该不会误输入
