Visual Basic kullanarak PC'ye girişleri devre dışı bırakabiliriz.
Tabikide kotu amac olarak değil.Kendinize bir internet kafe programi yapabilirsiniz.

Forma 1'er adet Timer ve Command ekliyoruz.


Kod:
Option Explicit Private Declare Function BlockInput Lib "user32" (ByVal fBlock _ As Long ) As Long Const API_FALSE = 0& Const API_TRUE = 1& Private Sub Command1_Click( ) Timer1.Interval = 500 Timer1.Enabled = True Call BlockInput(API_TRUE ) End Sub Private Sub Timer1_Timer( ) Static Cnt As Long Cnt = Cnt + 1 If Cnt > 10 Then Cnt = 0 Timer1.Enabled = False Call BlockInput(API_FALSE ) Label1.Caption = "" Else Label1.Caption = "Acılması İcin Kalan Zaman: " _ & Format$(CStr((10 - Cnt ) ) / 2, "0.0" ) End If End Sub

__________________