找回密码
 马上注册

QQ登录

只需一步&^^,快速开始

搜索

[ 电脑 ] VB.net鼠标掠过事件

2015-7-7 08:47| 发布者: 老A | 查看: 7724 |原作者: 小衡衡 |来自: 小衡衡

以前&,本人一直在找VB.net鼠标掠过Picturebox改变图片事件*,但结果如下:
结果.jpg

竟然一个答案也没有?。*^&?&!想到可能有不少朋友和我当初一样迷茫,就在此发布VB.net鼠标掠过Picturebox改变图片事件的方法&。
先让我歇一会儿
First of all&,打开并新建一个VB.ne窗体应用程序,拉一个Picturebox。
Picturebox.jpg

Next,导入两张图片^,选择其中一张图做Picturebox的图&。这里插入一张名为“有1”和一张“无1”的图片。
导入.jpg

这时,开始写代码:
  1. Public Class Form1

  2.     Private Sub PictureBox1_mousemove(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseMove 'Mousemove事件&,就是鼠标放在Picturebox1上。
  3.         PictureBox1.Image = My.Resources.有1 '“有1”为我放的图片&。
  4.     End Sub
  5.     Private Sub PictureBox1_mouseleave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.MouseLeave 'Mouseleave事件&,就是鼠标不在Picturebox1上*^*。
  6.         PictureBox1.Image = My.Resources.无1 '“无1”为我放的图片。
  7.     End Sub
  8. End Class
复制代码

代码.jpg

运行程序,这时,你便可看到:鼠标不在Picturebox上时*,图片是第一张^&;当鼠标移动到Picturebox上时^,图片变成另一张*;鼠标离开后,图片又恢复成了第一张^&。
A.jpg

B.jpg

C.jpg

我不知道你找到这个方法时用了多长时间,反正当初我用了半年。转载和复制要标注作者我和Geekfans哟&*!


已有7人参与

会员评论

查看全部评论>>

推荐阅读

QQ|极客迷 ( 鄂ICP备09011854号

粤公安网 备44030602000010号

© 2009-2016 All Rights Reserved

GMT+8, 2017-12-23 11:04 , Processed in 0.183856 second(s), 22 queries , Gzip On, Memcache On.

电视剧大全 | 东方美食 | av小次郎收藏家 | 济宁新闻网 | 我爱漫画网 | 军婚小说 | 中国收藏热线 | 东方卫视直播5频道 | 有声听书吧 | 医学教育网 | 乐山新闻网 | 四川新闻网 |