大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
1,使用其它控件
创新互联主要从事网站设计制作、网站建设、网页设计、企业做网站、公司建网站等业务。立足成都服务江达,10多年网站建设经验,价格优惠、服务专业,欢迎来电咨询建站服务:18980820575
2,用api切割需要更改的控件,就像做不规则的窗体一样
3,用image加上一些漂亮的ico图标代替command button
vb点虐 中控件都是矩形的,如果一定要看起来是其他形状的,只能用背景图片,一般要三个背景图片,正常时候、鼠标移上时候、按下时候的。分别在按钮的四个事件:MouseHover MouseLeave MouseDown MouseUp的时候更换成相应的背景图片
本来有个属性FlatStyle设置为Popup基本上能实现这个情况,怎奈有个线框怎么也弄不掉。FlatAppearance.BorderSize设置为0不起作用,只对Flat有用,所以用代码在Flat和Popup两种风格之间切换。
'在鼠标进入时设置为浮雕风格
Private Sub Button1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseEnter
Button1.FlatStyle = FlatStyle.Popup
End Sub
'离开时设置为平面风格,这样像标签一样只剩下文字,当然要FlatAppearance.BorderSize设置为0
Private Sub Button1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseLeave
Button1.FlatStyle = FlatStyle.Flat
End Sub
'另外把UseVisualStyleBackColor 设置为 False也会好看一点。