主题：关于listview拖动，同步删除记录的问题

Dim lvw As WinForm.ListView = e.Sender

Dim itm As WinForm.ListViewRow =  e.Source.Rows(e.OldIndex) '获取要拖动过来的行

Dim t As Table = e.Form.Controls("table1").Table

If e.Source.Name <> e.Sender.Name Then '如果是从其他ListView中拖动过来的

    e.Delete = False '不要删除原来的项目

    Dim dr As DataRow = itm.Tag

    t.AddNew

    t.Current("第一列") = dr("第一列")

    t.Current("第二列") = dr("第二列")

    

    Dim Key As String = t.Current("第二列") '获取此员工的照片文件

    lvw.Images.AddLargeImage(Key, Key) '添加照片,直接用文件名作为图片键值

    ‘去掉以上三行代码

End If