Foxtable(狐表)用户栏目专家坐堂 → [求助]引用图标,请红袍哥帮忙修改一下代码


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

主题:[求助]引用图标,请红袍哥帮忙修改一下代码

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


加好友 发短信
等级:三尾狐 帖子:604 积分:6988 威望:0 精华:0 注册:2012/5/30 16:01:00
[求助]引用图标,请红袍哥帮忙修改一下代码  发帖心情 Post By:2015/12/26 11:01:00 [只看该作者]

Dim trv1 As WinForm.TreeView = Forms("侧边栏").Controls("tr1")
Dim trd1 As WinForm.TreeNode= trv1.SelectedNode
Forms(trd1.name).BaseForm.Icon= trd1.IconFile   红色的部分有错误,请帮忙修改一下,谢谢!

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/26 11:40:00 [只看该作者]

 

[此贴子已经被作者于2015/12/26 11:41:27编辑过]

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/26 11:46:00 [只看该作者]

Forms(trd1.name).BaseForm.Icon= new System.Drawing.Icon(trd1.IconFile)

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


加好友 发短信
等级:三尾狐 帖子:604 积分:6988 威望:0 精华:0 注册:2012/5/30 16:01:00
  发帖心情 Post By:2015/12/27 13:39:00 [只看该作者]

谢谢!

 回到顶部