home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / movemo1a / module1.bas < prev    next >
Encoding:
BASIC Source File  |  1997-11-29  |  292 b   |  12 lines

  1. Attribute VB_Name = "Module1"
  2. Option Explicit
  3.  
  4. Type POINTAPI
  5.     x As Long
  6.     y As Long
  7. End Type
  8.  
  9. Declare Function ClientToScreen Lib "user32" (ByVal hwnd As Long, lpPoint As POINTAPI) As Long
  10. Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
  11.  
  12.