Foxtable(狐表)用户栏目专家坐堂 → [求助]用目录树给其他表的某一列赋值


  共有2105人关注过本帖树形打印复制链接

主题:[求助]用目录树给其他表的某一列赋值

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/13 17:25:00 [显示全部帖子]

Dim trv As WinForm.TreeView = e.Form.controls("treeview1")
If trv.SelectedNode IsNot Nothing Then
    Dim dr As DataRow = trv.SelectedNode.DataRow
    Dim r As Row = Tables("表A").current
    r("第一列") = dr("班级编号")
Else
    msgbox("你没有选择节点")
End If


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/13 22:24:00 [显示全部帖子]

以下是引用jjjeyes在2018/9/13 22:08:00的发言:
原来可以用SelectedNode这个属性解决问题啊!这样方便多了。
但是还有个小问题,怎么判断选择的是第二节点呢??

 

比如

 

If trv.SelectedNode.Level = 1 Then '第二层节点


 回到顶部