" id="b1img" alt="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" title="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO">
  • " alt="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" title="米课”N+1“思维建站-非官方免费技术支持,Wordpress/Zencart/Opencart建站、SEO" />
  • " alt="Windows/Linux服务器运维技术支持 环境搭建、应用发布、服务器管理、虚拟化、云计算" title="Windows/Linux服务器运维技术支持 环境搭建、应用发布、服务器管理、虚拟化、云计算" />
  • " alt="高校/小型企业网络运维与建设免费技术支持,网络规划、网络优化、故障排除、网络管理" title="高校/小型企业网络运维与建设免费技术支持,网络规划、网络优化、故障排除、网络管理" />

VB-鼠标事件优先级问题

程序设计2005-07-16 itlogger阅读(543) 评论(1)

    写一个画网络拓扑的程序,如图所示,可以拖拉控件到Form上,并且控件可以在Form上移动。
Private Sub Form_Dragdrop(Source As Control, x As Single, Y As Single)
    现在要做一个鼠标左击响应效果,显示交换机控件的详细信息
    可是在mouse_down,click,mouse_up事件中一一试过都不行
  

 Private Sub imgSwitch_MouseDown(Index As Integer, Button As Integer, Shift As Integer, x As Single, Y As Single)
debug.print button

    显示:无法得到左击button=1的值,却可以得到右击button=2的值
    而在drag_drop中,左右击button=1,2都正常
    初步估计是左击事件和dragdrop执行的优先级问题
    改在mouse_move事件中执行左击事件,解决问题!
    http://photoimg11.qq.com/cgi-bin/load_pic?verify=Eoh%2BKvCUa0RZWHbl%2F%2B1ldQ%3D%3D

转载请注明 :IT樵客
文章地址:http://www.itlogger.com/program/122.html

One thought on “VB-鼠标事件优先级问题

  1. 查资料 谢谢了

发表评论

电子邮件地址不会被公开。 必填项已用*标注