VB中数个Shape控件无规则移动，鼠标碰上就发生一个事件怎么写？
2个回答
展开全部
shape不相应鼠标事件，
我一般采取的做法是在shape相同位置放一个image控件，image控件可以响应鼠标事件
当移动shape的时候同时移动image控件
image边框要设定为无，运行起来是透明的看不见
我一般采取的做法是在shape相同位置放一个image控件，image控件可以响应鼠标事件
当移动shape的时候同时移动image控件
image边框要设定为无，运行起来是透明的看不见
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
无规则移动用Timer控件+Move方法+Rnd函数，Shape控件本身不产生事件，你可以用Form_MouseMove检测鼠标的坐标，是否落在Shape控件上
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
