[求助]下拉目录树的输入问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]下拉目录树的输入问题

共有5164人关注过本帖树形打印复制链接主题：[求助]下拉目录树的输入问题

东坡一剑

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：366 积分：2478 威望：0 精华：0 注册：2013/1/13 23:43:00

[求助]下拉目录树的输入问题 发帖心情

Post By：2013/7/12 14:58:00 [显示全部帖子]

设计了一个窗口，类型为DropDownForm，窗口中有一个目录树控件，已经生产一个4层的目录树，

在目录树控件的NodeMouseDoubleClick事件中设置如下代码，希望双击后能将对应的内容填入表中

Dim nd As WinForm.TreeNode = e.Node
If nd.Level = 3 Then
    Dim sts As String() = nd.FullPath.Split("\")
    Tables("库存透视及取货方案").Current("货号") = sts(1)
    Tables("库存透视及取货方案").Current("颜色") = sts(2)
    Tables("库存透视及取货方案").Current("尺码号") = sts(3)
    e.Form.Close()
End If

"颜色"和“尺码号”，能正常填入并显示，“货号”显示为空白，但是根据货号生成的其它列却产生了值

（项目事件AfterOpenProject 的代码为：Tables("库存透视及取货方案").Cols("货号").DropForm = "目录树").

不知道怎么回事，请指教！