| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请教提取目录树节点为窗口标题的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=164194) |
|
| -- 作者：weipeng6999 -- 发布时间：2021/4/29 9:06:00 -- 请教提取目录树节点为窗口标题的问题 老师早上好！ 请教一个双击目录树节点后，窗口标题能同步显示节点的文本。 Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1") Dim nd As WinForm.TreeNode = tr.SelectedNode Forms("窗口1").Text = nd.Text 代码提示：未将对象引用设置到对象的实例 代码是写在afterload内，谢谢老师！ |
|
| -- 作者：有点蓝 -- 发布时间：2021/4/29 9:21:00 -- Forms("窗口1").Text = e.node.Text |
|
| -- 作者：weipeng6999 -- 发布时间：2021/4/29 9:36:00 -- 蓝老师，
|
|
| -- 作者：有点蓝 -- 发布时间：2021/4/29 9:50:00 -- 去掉其它代码 e.Form.Text = e.node.Text如果要能看真正的错误提示，注意项目路径和项目名称不能有括号等特殊符号
|
|
| -- 作者：weipeng6999 -- 发布时间：2021/4/29 10:30:00 -- 我确定了没有特殊符号，窗口设置的事共有窗口。在afterload里面也只有这三句代码 Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1") Dim nd As WinForm.TreeNode = tr.SelectedNode e.Form.Text = e.node.Text 去掉这三句代码，用别的代码正常运行。只用e.Form.Text = e.node.Text一句代码，也是“未知编译错误” [此贴子已经被作者于2021/4/29 10:33:49编辑过]
|
|
| -- 作者：有点蓝 -- 发布时间：2021/4/29 10:32:00 -- 双击目录树节点代码应该放到目录树的NodeMouseDoubleClick事件 |
|
| -- 作者：weipeng6999 -- 发布时间：2021/4/29 10:37:00 -- 谢谢蓝老师，放到NodeMouseDoubleClick不报错了，但是双击节点后，窗口标题没有变化。 |
|
| -- 作者：有点蓝 -- 发布时间：2021/4/29 10:42:00 -- 要改当前窗口，还是其它窗口的标题？ |
|
| -- 作者：weipeng6999 -- 发布时间：2021/4/29 10:42:00 -- 当前窗口的 |
|
| -- 作者：weipeng6999 -- 发布时间：2021/4/29 10:46:00 -- 可以了，改了窗口模式，谢谢！ |