文件名称:VB 浮动按钮制作小例
文件大小:2KB
文件格式:RAR
更新时间:2010-08-22 03:34:41
VB 浮动按钮制作
关于浮动按钮的实现思路不少,多是采取多图片重叠显示来实现。这种方法代码量多,实现起来较繁琐。因为,一个按钮还好,如果有十个按钮呢?一个按钮三个图片,十个就要三十个图片,可不是闹着玩的。
我的思路是:
舍弃CommandButton控件,每个按钮用4条Line控件和一个Label控件替代。4条Line围住Label的边缘,调入窗体时,置显示属性为False,并将左、上直线的颜色设为白色,右、下直线的颜色设为黑色。当鼠标移到Label上时,4条Line的显示属性置True;当鼠标离开按钮时,将4条Line的显示属性设置为False。这样在视觉上就完全得到立体浮动的效果。另外,VB的Line控件还支持直线倾斜,以此类推,完全可以做出更加美观的倾斜按钮。下面仅给出一个按钮实现浮动效果的源代码例子。
【文件预览】:
浮动按钮小例
----工程1.vbw(51B)
----工程1.vbp(631B)
----Form1.frm(2KB)
----MSSCCPRJ.SCC(190B)