红色代码可以显示所有属性
Dim o = Forms("窗口1").Controls("NavBar1")
'For Each c As object In o.Gettype.getproperties' output.show(c.name)'Next
o.ButtonHeight = 30o.StackButtonCount = 1
加好友 
发短信
Post By：2015/10/8 23:10:00 [显示全部帖子]
