主题：[求助]可以让不同字段都能使用同一个目录树表的窗口吗？

窗口表事件

窗口与控件事件

年月_AfterLoad

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")

trv.BuildTree("年月","年|月")

年月_Button1_Click

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")

trv.BuildTree("年月","年|月")

年月_TreeView1_NodeMouseClick

If e.Node.Level = 1 Then '如果单击的是第二层节点

     Dim tr As Row = Tables("员工表").Current

    Dim dr As DataRow = e.Node.DataRow '获取生成此节点的DataRow

     tr("社保起始年月") = dr("年月") '——————请看窗口1这句代码，点选第二层节点后，只能要么在"起始年月"字段填入，

 'tr("社保停止年月") = dr("年月") '——————要么改代码在"停止年月"字段填入，不可能两个字段同时填入同一年月吧？

 'e.Form.DropDownBox.Value = tr("社保起始年月") '这行不是多余的,省略此行,无法在表中正常使用此下拉窗口输入数据.

      e.Form.DropDownBox.CloseDropdown()

End If