以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- TreeView 去边框,请教! (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=72886) |
-- 作者:blackwolf -- 发布时间:2015/8/8 9:53:00 -- TreeView 去边框,请教! 这个是在VS中的代码:Me.TreeView1.BorderStyle = System.Windows.Forms.BorderStyle.None 可以修改,并且能去边框! 我在狐表中修改: Dim TreeV As WinForm.TreeView = e.Form.Controls("左侧弹出菜单TreeView") Treev.BorderStyle = System.Windows.Forms.BorderStyle.None 提示:BorderStyle 不是 WinForm.TreeView的成员。 然后我又改成 Dim TreeV As WinForm.TreeView = e.Form.Controls("左侧弹出菜单TreeView") e.Form.Controls("左侧弹出菜单TreeView").BorderStyle = System.Windows.Forms.BorderStyle.None 可以通过,但是,在预览的时候报错: 未找到类型“TreeView”的公共成员“BorderStyle”。 我又改成底层控件来试 Dim TreeV As object = e.Form.Controls("左侧弹出菜单TreeView").basecontrol Treev.BorderStyle = System.Windows.Forms.BorderStyle.None 还是报错,没辙了! |
-- 作者:逛逛 -- 发布时间:2015/8/8 10:11:00 -- Forms("窗口1").Controls("TreeView1").BaseControl.BorderStyle = System.Windows.Forms.BorderStyle.None |
-- 作者:逛逛 -- 发布时间:2015/8/8 10:13:00 -- 严谨一点
\'Ctype(Forms("窗口1").Controls("TreeView1").BaseControl,System.Windows.Forms.TreeView).BorderStyle = System.Windows.Forms.BorderStyle.None |
-- 作者:blackwolf -- 发布时间:2015/8/8 10:22:00 -- e.Form.Controls("左侧弹出菜单TreeView").BaseControl.BorderStyle = System.Windows.Forms.BorderStyle.None 怪事。这样可以。 但是如要要定义了 treeview。在引用就报错,程序结构上应该是一样的啊。 treev.BaseControl.BorderStyle = System.Windows.Forms.BorderStyle.None 能否说说看! |
-- 作者:有点蓝 -- 发布时间:2015/8/8 10:32:00 -- Dim treev As WinForm.TreeView = e.Form.Controls("TreeView1") Dim tre As Windows.Forms.TreeView = treev.BaseControl tre.BorderStyle = System.Windows.Forms.BorderStyle.None 应该是动态对象Object 类型 和指定类型对象之间的区别
|