VB中如果我要让我的鼠标经过某个按钮时,他会亮一下

我想要那个按钮可以有一些明显的变化的效果,比如我截图中的那种,会多一个黄色边框,具体如何实现... 我想要那个按钮可以有一些明显的变化的效果,比如我截图中的那种,会多一个黄色边框,具体如何实现 展开
 我来答
Wager0
2012-02-09 · 超过16用户采纳过TA的回答
知道答主
回答量:29
采纳率:0%
帮助的人:41.5万
展开全部
有几种方法:
1.改变按钮的mousepointer或者mouseicon属性
2.在按钮的MouseMove事件中改变按钮的BackColor,同时要把按钮的style设置为1
3.用这个Image控件,添加按钮图片,用这个事件MouseMove改变图片
4.用第三方控件
如果是要出现黄色边框那种,只能用第3,4种方法了
百度网友a8b3551
2012-02-09 · TA获得超过193个赞
知道小有建树答主
回答量:339
采纳率:100%
帮助的人:152万
展开全部
其实楼上的方法很全页,够用了!
详细点:
<a class="" onMouseOver="this.className='name';" onmouseout="this.className='';></a>
name 就是你鼠标指向时显示的已定义的一个CSS样式
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
daviddyn
2012-02-10 · TA获得超过556个赞
知道小有建树答主
回答量:198
采纳率:0%
帮助的人:161万
展开全部
让按扭亮一下(首先要把按钮的Style设为1,这个不用我细说了吧),就意味着这个按钮的填充颜色中的红色、绿色、蓝色同时增加相同的大小(这样做的好处是可以不限制按钮原来是什么颜色,在原有颜色的基础上增亮)。增加黄色边框,我推荐你可以事先画一个和你的按钮等大小同位置形状为矩形的Shape控件,并置于按钮的下方,将其BorderColor设为黄色,BorderWidth设为6或更大,最后让它Visible为False。
在通用(声明)中打
Dim OrigColor
在Form的Load中打
OrigColor=Command1.BackColor
在Form的MouseMove中打
Command1.BackColor=OrigColor
Shape1.Visible=False
在Command1的MouseMove中打
On Error Goto Error1
Command1.BackColor=OrigColor+RGB(10, 10, 10) '如果觉得亮度变化不够明显可适当将这三个10一齐改为更大的数,但一定要保证这三个数相等
Shape1.Visible=True
Exit Sub
Error1:
Command1.BackColor=vbWhite
Shape1.Visible=True
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式