主题：RowActivate的问题

增加和删除不就行了？

Dim lvw As WinForm.ListView = e.Form.Controls("ListView2")

Dim vr As WinForm.ListViewRow = lvw.Rows.Add()
vr.Text = e.Sender.Current.Text
vr.Name = e.Sender.Current.Name

e.Sender.Current.Delete