请问vb里面怎么实现鼠标滑过,图片切换?

iha2000 2005-09-21 05:35:10
我是菜鸟,我想实现当鼠标滑过一个图片按钮时,按钮上图片切换,就象网页的动态按钮那样。
怎么才能实现啊??
...全文
196 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
northwolves 2005-09-21
  • 打赏
  • 举报
回复 1

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = LoadPicture("c:\2.gif")
End Sub

Private Sub Form_Load()
Command1.Picture = LoadPicture("c:\1.gif")
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = LoadPicture("c:\1.gif")
End Sub

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧