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

[wyzjiguang]

我想鼠标按住左键拖动。鼠标松开。所选区域中的label控件要被选中，然后变色，应该怎么实现？先谢了。

[TomyChoi]

声明两个全局变量， 一个标志变量
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属性及可知道那些控件被选中

上面是给出思路，代码自己写应该不会很难的。

[caofusheng]

楼上说的很好

[daisy8675]

奇怪，说的是设计还是代码

设计直接ctrl+A全选不就得了

[白发程序猿]

确实奇怪啊，做出来的程序还需要这样的功能干吗？

[wyzjiguang]

忘记还有没结的帖子，不好意思