您的位置:程序门 -> vb ->



鼠标单击次数的问题!!~~~~


[收藏此页] [打印本页]选择字色:背景色:字体:[][][]


鼠标单击次数的问题!!~~~~
发表于:2007-08-01 14:47:52 楼主
在程序编写过程中想要程序运行是根据鼠标单击的次数来激发事件,要怎么编写.....   急................
发表于:2007-08-01 15:03:131楼 得分:0
在一定时间内点一下就+1了.
发表于:2007-08-01 15:24:302楼 得分:0
添加一个计数器
发表于:2007-08-01 17:40:313楼 得分:0
................................
发表于:2007-08-03 12:12:574楼 得分:0
用getasynckeystate判断鼠标是否按下过,按下则变量+1,if   变量=你要求的鼠标单击的次数则激发事件
发表于:2007-08-04 11:10:155楼 得分:0
视需求,下一个全局或局部的鼠标钩子,单击则计数器+1,达到需求则执行相应事件,注意,全局的钩子需要放在标准win32   dll里面。
发表于:2007-08-04 14:31:446楼 得分:0
在win2000及以上系统里面,可以直接使用_ll的鼠标hook,这样可以连标准dll都省了

lz不是想做一个鼠标计数软件吧?
发表于:2007-08-05 15:19:557楼 得分:0
不好意思   我知道怎么做了直接声明一个静态变量就可以了...
发表于:2007-08-05 15:23:258楼 得分:0
不过我到现在还不知道怎么用vb编写一个能进行三个数以上比较大小的程序诶,谁知道怎么做啊
发表于:2007-08-05 15:51:309楼 得分:0
唉!我想上面回答的人想白说了,我想在学习期间,你不要想这想哪!你要按照一本教程去学习,循序渐进!“编写一个能进行三个数以上比较大小的程序”也是很必要的!~-~
发表于:2007-08-05 16:11:3910楼 得分:0
给你2个变量   让你交换他们的值   不用辅助变量   至少3种方法
发表于:2007-08-10 15:51:1311楼 得分:0
private   sub   form_load()
    msgbox "单击窗体 ",   ,   "提示 "
end   sub  
private   sub   form_click()
dim   a   as   single   ,b   as   single   ,   c   as   single  
a   =   inputbox( "请输入变量的值 ", "输入 ")
b   =   inputbox( "请输入变量的值 ", "输入 ")
c   =   inputbox( "请输入变量的值 ", "输入 ")
if   a> b   then  
    if   b   >   c     then  
        print   a   ,b   ,   c
    else
        print     a   ,   c   ,   b
end   if  
else  
    if   a   <   c   then  
      if   b <c   then
          print   c   ,   b   ,   a  
      else  
          print   b,c   ,a  
    end   if  
else  
    print   b   ,a   ,c
  end   if  
end   if  
end   sub



快速检索

最新资讯
热门点击