VB6实现Win98风格工具栏

Win98 风格的 UI 一直有一股复古味道,用 VB6 来还原也蛮有意思的。用的是CoolBarToolBar两个控件,搭配ImageList,效果还挺像那么回事。

CoolBar 控件的 Bands设计比较灵活,每个带区都能塞控件,比如一个工具栏,甚至一段文本。Align 设成 1,直接吸附到窗体顶部,省心。

ToolBar 控件放在 CoolBar 里,是整个工具栏的主角。按钮图标用ImageList控件来管理,一个放普通图标,一个放鼠标悬停图标。ImageList 属性和 HotImageList 属性别搞混了,正好一一对应。

再说按钮,ToolBar 的Buttons页签可以添加图标、文本,还能设置按钮风格,Style: 1就能让它变成按钮样式。需要响应用户操作?用ButtonClick事件就对了,直接写代码逻辑,简单明了。

嗯,整体思路其实挺清晰的:CoolBar 管布局,ToolBar 管内容,ImageList 搞图标,按钮事件加交互。搭起来之后,你会发现真有点 Windows 98 那味了。如果你也怀旧,或者在搞内部小工具,试试还挺有趣的。

txt 文件大小:1.57KB