主题：目录树的运用

专家：

   我上午将您给的代码写入【nodemouseclick】事件后

 

If e.Node.Level = 4 Then

Dim tr As Row =e.form.DropTable.Current

Dim dr As DataRow = e.Node.DataRow

    tr("供应商") = dr("供应商")
    tr("ylmc") = dr("ylmc")
     tr("yldm") = dr("yldm")
      tr("gfdm") = dr("gfdm")

     tr("含税价") = dr("含税价")

       e.Form.DropDownBox.Value = tr("供应商") 
      e.Form.DropDownBox.CloseDropdown()
End If

 

 

出现了以下信息：

 

NET Framework 版本：4.0.30319.42000
Foxtable 版本：2020.3.29.8
错误所在事件：窗口,原料目录树,TreeView1,NodeMouseClick
详细错误信息：
未将对象引用设置到对象的实例。

 

 不知所措了，试了几个代码都无效，还需要您指教！

 

做个例子发上来看看

我就是想在窗口中录入原料入库和出库数据时共用一个目录树窗口。想写在【nodemouseclick】事件中，写通用代码。其实在原料入库窗口中用这个目录树时，已经通过了，但必须写Dim tr As Row = Tables("ylqcb").Current，上具体的“ylqcb”名，我想既然通用，就应该有通用代码。我试了一下e.table.name，表示是当前选定的表，出错了。学得不好，添麻烦了！

如果不是下拉窗口，改为