以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于navbar 的问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=75452)

--  作者:深呼吸
--  发布时间:2015/10/8 22:50:00
--  关于navbar 的问题
我在使用过程中 遇到了低分辨率 无法正常显示整个 navbar 内容的问题。 
我想知道navbar 的 “按钮高度” 可以用程序设置么? 
或者 ”显示按钮数“ 和 "水平栏高度“ 这些属性可以在程序运行时例如 所在form 的 afterload 事件里 修改么?

--  作者:大红袍
--  发布时间:2015/10/8 23:10:00
--  

红色代码可以显示所有属性

 

Dim o = Forms("窗口1").Controls("NavBar1")

\'For Each c As object In o.Gettype.getproperties
\'    output.show(c.name)
\'Next

o.ButtonHeight = 30
o.StackButtonCount = 1