首页 相关文章 Check开机方式及Mouse Buttons个数

Check开机方式及Mouse Buttons个数

Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As LongConst SM_CMOUSEBUTTONS = 43Const SM_CLEANBOOT = 67Private Sub Form_Load()Dim mode As LongDim NumbButtons As Longmode = GetSystemMetrics(SM_CLEANBOOT)Select Case modeCase 1  Debug.Print "The System is in Safe Mode"Case 2  Debug.Print "Fail-safe with network boot"Case 0  Debug.Print "Normal Mode"End SelectNumbButtons = GetSystemMetrics(SM_CMOUSEBUTTONS)Debug.Print "Number of Mouse Buttons :"; NumbButtonsEnd Sub
...[ 查看全文 ]

2016-02-19 标签:

Check开机方式及Mouse Buttons个数的相关文章

手机页面
收藏网站 回到头部