请问一个ToolsBar控件的问题。

Question

好象不行啊。
在设计时没法调小高度啊。好象它自己默认了一个最小高度。
在运行的时候用Toolbar1.ButtonHeight = 300，
可是一点效果都没有请指教！

Answer 1

Toolbar1.Height = 300也不行，
好象反而变大了。。

Answer 2

to: ferrytang(ferry)
不明白什么意思

Answer 3

您可以试试这样,右键选中COOLBAR,在属性页中将"固定背景"的勾去掉

Answer 4

谢谢footballboy(郑创斌)的回复。
可是空是ToolBar留的，我试了一下，好象不其作用。

Answer 5

使用 ToolBar 的API控件，更改 ToolBar 的式样。

Answer 6

请问一个ToolsBar控件的问题。
放马后炮,拿人钱财,替人消灾.private const WM_USER=&H400
private const TB_SETIMAGELIST=WM_USER+48
private const TB_SETSTYLE=WM_USER+56
private const TB_GETSTYLE=WM_USER+57
private const TBSTYLE_LIST=&H1000private sub form_Load()
    dim hTool as long,style as long
    htool=findwindowEX(Toolbar1.hwnd,0&,"msvb_lib_toolbar",vbNullstring)
    style=sendmessage(htool,TB_GETSTYLE,0&,0&)
    sendmessage htool,TB_SETSTYLE,0&,byval (style or TBSTYLE_LIST)
    sendmessage htool,TB_SETIMAGELIST,0&,0&
end subOK!!!!
售后服务周到?end sub