| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 937 人关注过本帖
标题:[讨论]有谁可以做计算鼠标单击次数?
只看楼主 加入收藏
limaowin
Rank: 1
等 级:新手上路
帖 子:69
专家分:0
注 册:2005-3-24
收藏
 问题点数:0 回复次数:8 
[讨论]有谁可以做计算鼠标单击次数?
请问:
       有没有人会做计算鼠标单击次数的软件撒!
       (就是在一分钟里看你鼠标单击次数)
搜索更多相关主题的帖子: 鼠标 单击 软件 
2005-10-03 13:09
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 
给你一个提示: 用 MouseDown 事件或 Click 事件来增加一次鼠标点击次数。
2005-10-03 15:25
atomhdp
Rank: 1
等 级:新手上路
帖 子:97
专家分:0
注 册:2005-10-2
收藏
得分:0 
静态变量!?!?

2005-10-06 08:36
029
Rank: 1
等 级:新手上路
帖 子:71
专家分:0
注 册:2005-8-26
收藏
得分:0 
全局变量啊
发生了mousedown就加1 啊

2005-10-06 16:31
shifeng2799
Rank: 1
等 级:新手上路
帖 子:83
专家分:0
注 册:2005-9-23
收藏
得分:0 
到底行不行呀!

2005-10-08 01:37
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 
算了,还是写出代码吧:
Global iClick As Integer,iSec As Integer
Private Sub Form_Load()
   Timer1.Interval = 1000
Next
Private Sub Form_Click()
   iClick = iClick + 1
   Cls: Print "你已经点了 "; iClick; " 次"
End Sub
Private Sub Timer1_Timer()
  iSec = iSec + 1
  If iSec = 60 Then
    Timer1.Enabled = False
    MsgBox "时间到!", vbInformation, "提示"
  End If
End Sub

[此贴子已经被作者于2005-10-9 22:54:57编辑过]


2005-10-08 23:16
白色花生壳
Rank: 1
等 级:新手上路
帖 子:11
专家分:0
注 册:2005-9-22
收藏
得分:0 
要用到API
否则窗体失去焦点是统计不到的.
2005-10-09 11:16
随风的故事
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2005-10-8
收藏
得分:0 
Dim i As Integer
Private Sub Form_Click()
i = i + 1
Label2 = i
End Sub
这么很简单
2005-10-11 22:04
夏侯剑
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2005-10-13
收藏
得分:0 
我刚学编程,啥都不懂,我想请教一下Global iClick As Integer,iSec As Integer这句如何理解,谢谢!

2005-10-13 15:00
快速回复:[讨论]有谁可以做计算鼠标单击次数?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.036121 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved