怎么用鼠标选中窗体中的多个控件?

wyzjiguang 2008-01-12 08:32:25
我想鼠标按住左键拖动。鼠标松开。所选区域中的label控件要被选中,然后变色,应该怎么实现?先谢了。
...全文
131 点赞 收藏 5
写回复
5 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
wyzjiguang 2009-10-05
忘记还有没结的帖子,不好意思
回复
白发程序猿 2008-01-15
确实奇怪啊,做出来的程序还需要这样的功能干吗?
回复
daisy8675 2008-01-14
奇怪,说的是设计还是代码

设计直接ctrl+A全选不就得了
回复
caofusheng 2008-01-12
楼上说的很好
回复
TomyChoi 2008-01-12
声明两个全局变量, 一个标志变量
dim x_pos as long,y_pos as long
dim LButtonDown as boolean

在MouseDown事件里:

x_pos=鼠标点下的位置x
y_pos=鼠标点下的位置y
LbuttonDown=true

在MouseMove事件里:
if LbuttonDown=true then
循环每个控件看看是不是在点下时和目前鼠标位置之间的区域里,如果是
改变其BackColor,或都可以在每个控件的Tag属性做标志

在MouseUp事件里:
LbuttonDown=false


你只要在程序的其它地方检索Tag属性及可知道那些控件被选中

上面是给出思路,代码自己写应该不会很难的。
回复
发动态
发帖子
VB基础类
创建于2007-09-28

7453

社区成员

VB 基础类
申请成为版主
社区公告
暂无公告