相关代码 |
|
显示和隐藏鼠标 声明: Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long 显示鼠标: lReturned = ShowCursor (1) 隐藏鼠标: lReturned = ShowCursor (0) 取得并设置双击间隔时间 取得双击间隔时间: Declare Function GetDoubleClickTime Lib "user32" Alias "GetDoubleClickTime" () As Long 使用: 返回千分之一秒的时间间隔数。 设置双击间隔时间: Declare Function SetDoubleClickTime Lib "user32" Alias "SetDoubleClickTime" (ByVal wCount As Long) As Long 使用: wCount 为千分之一秒的时间间隔数。