设为首页 - 加入收藏
广告 1000x90
您的当前位置:皮皮彩票app下载 > 不变代码移出 > 正文

VB鼠标移进移出的问题。

来源:未知 编辑:admin 时间:2019-04-13

  想要达到这样的效果,即有数组label1,5个,当鼠标移进label时,label1背景颜色改变为蓝色,移出时恢复原来颜色。当鼠标点击label时,label颜色为红色,鼠标移动到其他label时仍变为蓝...

  想要达到这样的效果,即有数组 label1,5个,当鼠标移进label时,label1背景颜色改变为蓝色,移出时恢复原来颜色。当鼠标点击label时,label颜色为红色,鼠标移动到其他label时仍变为蓝色,点击变为红色的除外。例如微博中选项的效果。如图,求代码。谢谢

  可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资料”搜索整个问题。

  End Sub更多追问追答追问这代码 ,点击之后,鼠标回去没办法恢复原来颜色啊。当点击全部的时候 全部为红色了。我要的是点击的那个除外,其他移动的都变。追答刚才代码是点击过了的就是红色;你是说只有点击时才红,移开依然黑色?

  End Sub追问移动是蓝色啊 跟微博那个选项一样的效果,我上了图那个!追答移到对移出是什么颜色?我补发的代码在就是用黑色?只有移进才蓝色,,点击时红色,移出又黑色(原色),讲的都是字体颜色;追问上面的代码点击第一个为红色 点击第2个的时候第1和第2都是红色,我想要点击第2的时候只要第2为红色。追答请将最后Label1_MouseMove事件的代码换成下面,

  展开全部vb中label不能直接加载图片,你可以用来做就简单多了,或者换别的控件,移进移出好实现,

  移出可以Form_MouseMove,点击加个变量表示状态,没完全实现就不贴代码了,当顶下共同学习了

  展开全部iisheng的回答百分百地干净利落,在Form_MouseMove事件里重复一遍Form_Load事件的代码即可更多追问追答追问重复之后 之前点击为红色的那个label也变为蓝色了!!但我要的是点击的那个红色不变,当点击另一个label的时候,原先那个红色变为原始颜色,鼠标移动到还是蓝色的效果。追答在Label1_MouseDown事件里记录index为静态变量,然后在Form_MouseMove事件里排除即可追问静态变量不懂啊亲,求代码啊亲追答iisheng正在回答...追问还是没解决啊 我看你思路不同啊。你就别偷懒,给点代码学习下嘛亲追答Dim i%, n% 全局变量,也称模块级静态变量,供任意过程调用

本文链接:http://thacba.net/bubiandaimayichu/210.html

相关推荐:

网友评论:

栏目分类

现金彩票 联系QQ:24498872301 邮箱:24498872301@qq.com

Copyright © 2002-2011 DEDECMS. 现金彩票 版权所有 Power by DedeCms

Top