但如果是自己设置的列表项目或目录树列表，（在表中或系统自带的记录窗口中，是有下拉选择的效果的）；但在自建的窗口中就没有下拉选择的效果。

     主表是"员工表"，其中有字段"社保起始年月"、"社保停止年月"。这两个字段都要用到“年月表“，而看http://www.foxtable.com/help/topics/2350.htm中好像"窗口1"只能用于一个字段。

     “年月表”窗口1代码：

窗口表事件

 

窗口与控件事件

 

年月_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

     请问可以让不同字段都能使用同一个目录树表的窗口吗？

没人回应？好吧我另写一篇吧。