35.txt

来自「VB文章集（含API、窗口、数据库、多媒体、系统、文件、等等）」· 文本 代码 · 共 12 行

获得、设置鼠标双击间隔时间   
       
获得鼠标双击间隔时间：
Public Declare Function GetDoubleClickTime Lib "user32" Alias _
"GetDoubleClickTime" () As Long
函数返回以毫秒为单位的鼠标双击间隔时间。
设置鼠标双击间隔时间
Declare Function SetDoubleClickTime Lib "user32" Alias _
"SetDoubleClickTime" (ByVal wCount As Long) As Long
其中的参数wCount为以毫秒为单位的新的时间间隔的长度。