下面这样的程序会造成误删数据库内容。If TreeView1.SelectedItem.Parent Is Nothing Then
MsgBox "不能删除全部部门。", vbInformation, "错误提示", "", context '错误提示
Else
If TreeView1.SelectedItem.Children = 0 Then '判断是否有子节点,0为无

解决方案 »

  1.   

    下面这样的程序会造成误删数据库内容。If TreeView1.SelectedItem.Parent Is Nothing Then
    MsgBox "不能删除全部部门。", vbInformation, "错误提示", "", context '错误提示
    Else
    If TreeView1.SelectedItem.Children = 0 Then '判断是否有子节点,0为无
      

  2.   

    你放一个断点进去看看selecteditem到底是什么。
      

  3.   


    唉,楼猪真惨,都没人帮忙顶帖,我已经帮你解决好几个问题了,剩下的机会就让给别人吧 ,顺便问下清零小妞好久不见还记得我不!!
    大名鼎鼎 当然记得lz这个问题我知道的就是 .children, 但是lz说不行。只能让他设个断点自己看看先了
      

  4.   

    还可以去数据库里查啊,从SelectedItem取到编码,然后去数据库里查查有没有子记录就好咯