Dim lvw As WinForm.ListView = e.Form.Controls("ListView1")
lvw.StopRedraw()'暂停绘制
'-------增加标题和追加记录
lvw.VirtualMode = True '以虚拟模式显示
lvw.VirtualListSize = Item_List.DataRows.count '设置虚拟模式下要显示的行数
lvw.ResumeRedraw()'恢复绘制
lvw.GridLines = True'显示网络线
lvw.AllowDrag = True '允许托动行（启动了虚拟模式，拖动功能无效)
lvw.AllowDrop = True '允许接收托运过来的行
lvw.MultiSelect = True '禁止选定多行
现象：
我在窗口的AfterLoad事件代码中为 ListView1 设置以上环境后，
1.能实现虚拟填充记录；
2.托动行的功能失效；
3.停用虚拟功能，拖动行功能就有效；
请教专家：如何在虚拟填充功能下同时实现“托动行” ？
谢谢了！
加好友 
发短信
Post By：2023/1/2 9:26:00 [显示全部帖子]
