删除时，不能确定是listview还是treeview中的信息被选中.txt

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· 文本 代码 · 共 12 行

我估计你是使用一个“删除”按钮来进行删除操作，这样ActiveControl是按钮，而不是ListView或TreeView。你可以声明一个窗体级变量： 
    Dim nLastControl As Integer 
    然后在ListView和TreeView的LostFocus事件中添加代码： 
    Sub ListView1_LostFocus() 
     nLastControl = 1 
    End Sub 
     
    Sub TreeView1_LostFocus() 
     nLastControl = 2 
    End Sub 
    这样你可以在删除时检查nLastControl的值，如果为1，说明刚才选择的是ListView。 
<END>