Foxtable(狐表)用户栏目专家坐堂 → 目录树,点击文字,如何打开窗口啊?


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

主题:目录树,点击文字,如何打开窗口啊?

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


加好友 发短信
等级:婴狐 帖子:86 积分:777 威望:0 精华:0 注册:2013/1/2 17:23:00
  发帖心情 Post By:2013/7/30 15:01:00 [显示全部帖子]

在doubleclick事件中添加
Dim tr As WinForm.TreeView
Dim tn As String
tr = e.form.Controls("TreeView1")
tn = tr.SelectedNode.Name
Select Case tn
    Case "值1"
        Forms("窗口1").Open
End Select

 回到顶部