November 13, 2009

VB 鍵盤滑鼠封鎖程式

我最近自己寫了一個超好玩的程式

這個程式你執行的話會把你的電腦滑鼠失靈



很像當機一樣

 
可以拿來惡作劇


對了!!不要亂玩,那不然解除不了的話就要重開電腦了喔~~

但機率很少......

==========================================
 
解除失靈方法 : Ctrl + Alt + Delete 

就可解除了!!
  
==================程式碼===================

Public Class Form1

    Declare Function BlockInput Lib "user32" (ByVal fBlockIt As Long)As Long
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles MyBase.Load

        BlockInput(True)

    End Sub

   End Class

================程式下載====================
我的程式是使用 VB2008 設計,所以你要先下面的套件,才能執行我設計的程式。:
http://www.microsoft.com/DownLoads/details.aspx?displaylang=zh-tw&FamilyID=d0e5dea7-ac26-4ad7-b68c-fe5076bba986

安裝好上述套件 ( 有裝過的人,可略過 ),請接著下載我正式版的程式:
http://w4.loxa.com.tw/f92630/GH/Cpu%20-%20Out.rar


 欠扁版下載點:
http://w4.loxa.com.tw/f92630/GH/OOB.rar

希望大家下載有問題或下載成功都可以跟我分享喔!!
如程式有問題我為在改進

0推薦此文章
Today's Visitors: 0 Total Visitors: 134
Personal Category: VB程式設計 Topic: technology / tech info / programming
Next in This Category: [VB程式語言] Picture BOX (v.1.0.0.3)←自己寫的
歷史上的今天:
[Trackback URL]

Reply
  • 1樓

    1樓搶頭香

    如何當機

  • at December 12, 2009 09:26 PM comment
  • 只要一開啟程式就可以當機了><

  • Blog Owner at December 15, 2009 11:21 PM Reply
  • 2樓

    2樓頸推

    很熱鬧的地方,互訪一下,增進感情!
    精美禮品送完即止
    Line帳號 aaashops。com
    佊俣佨仏丷

  • vickihppg26g at September 15, 2013 09:28 PM comment | Homepage | prosecute
  • 3樓

    3樓坐沙發

    這裏真不錯!!好文章!
    精美禮品送完即止
    Line帳戶 Lv333。com
    冷乖划亲剮

  • micaelmc523 at September 16, 2013 11:16 PM comment | Homepage | prosecute
Post A Comment









Yes No



Please input the magic number:

( Prevent the annoy garbage messages )
( What if you cannot see the numbers? )
Please input the magic number

誰來收藏
Loading ...
unlog_NVPO 0