module1.vb

Visual.Basic.NET实用编程百例-47.6M.zip

Module Module1

    Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hWnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer
    Public Const WM_SYSCOMMAND As Integer = &H112
    Public Const SC_SCREENSAVE As Integer = &HF140
End Module