Disable ALT+TAB

PERSIAPAN			PROPERTIES
NO	CONTROL	ITEM	NAME	VALUE	KETERANGAN
1.	Form	1

Masukkan souce ini ke dalam Form :Option Explicit Private Sub Form_Load() Dim ret As Long ret = SystemParametersInfo(97, True, ret, 0) KBDhwnd = SetWindowsHookEx(WH_KEYBOARD_LL, AddressOf CatchKeys, App.hInstance, 0) End Sub Private Sub Form_Unload(Cancel As Integer) Dim ret As Long ret = SystemParametersInfo(0, False, ret, 0) If KBDhwnd <> 0 Then UnhookWindowsHookEx KBDhwnd End Sub