主题：[求助]

动态目录树，怎么添加排序的代码

动态目录树已经有了   

没仔细看   行了

第二个问题已经解决      

If e.datacol.name = "姓名" Then

    Dim fdr As Datarow = DataTables("某表").Find("姓名 = '" & e.newValue & "'")

    If fdr is Nothing Then

        msgbox("姓名不准确")

        e.cancel = true

    End If

End If

这个代码的基础上    怎么样能够在输入错误的单元格生成一个有颜色的边框   这样方便知道是哪个错了

有的时候名字会复制进来很多    有些错别字  那个代码是有提示了    但是一次复制太多  就不知道是谁的名错了   最后有错的单元格都是空的

有标注了  但是把名字修改成正确的以后  标注也不会消失  只有重新加载项目才能消失   怎么处理

问题已经解决      

错误的名字   当时有标注   重新打开项目以后   标注都没了 怎么办                

这种情况，你就需要添加一个辅助列【提示】，把需要提示的文字赋值过去。