▶ 뭉충닷컴
 
mungchung.com login
Site Search
My Space
주절주절...
공부방
쥔장소개
Board
자유게시판
유용한 정보
자료실
Programming
강좌 & Articles
Spring 3.0
프로그래밍 Tip
   -ASP
   -PHP
   -JavaScript
   -HTML
   -Java/JSP
   -Database
   -Crystal Report
   -Visual Basic
   -이클립스
   -리눅스
   -기타
Windows API (VB)
Spread Sheet 7.0
컴퓨터활용 Tip
Other things
StarCraft 전략
StarCraft 문서
김용(金庸)
Son Q & Dieda

마우스(Mouse) 이동

조회 수 4559 추천 수 0 2005.05.24 22:07:23
뭉충닷컴 *.101.175.159
참고로 원문 소스가 잘못 되어 있어서 데브피아에서 글 보고 조금 수정했다.


'-------------------------------------------------------------------------------------------
// 마우스를 화면 최상된 왼쪽 끝으로 이동
'-------------------------------------------------------------------------------------------
Private Type POINTAPI
    x As Long
    y As Long
End Type
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Dim pt As POINTAPI

Private Sub Command1_Click()
    SetCursorPos 0, 0
End Sub


'-------------------------------------------------------------------------------------------
// 마우스의 현재좌표구해서 오른쪽으로 10만큼 이동하도록
'-------------------------------------------------------------------------------------------
Private Type POINTAPI
    x As Long
    y As Long
End Type
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Dim pt As POINTAPI

Private Sub Command1_Click()
    GetCursorPos pt
    SetCursorPos pt.x + 10, pt.y
End Sub





Source Page : http://www.mentalis.org/tips/tip019.shtml
문서 첨부 제한 : 0Byte/ 2.00MB
파일 크기 제한 : 2.00MB (허용 확장자 : *.*)
List of Articles
번호 제목 글쓴이 날짜 조회 수
공지 본 게시물들은 AllAPI.net 에서 퍼온것을 수정한겁니다. 뭉충닷컴 2005-05-24 7579
44 스크롤바(ScrollBar) 구현하기 뭉충닷컴 2005-05-25 6248
43 모니터 스크린(Screen) 해상도 구하기 뭉충닷컴 2005-05-25 6620
42 전체화면, 현재 폼, 다른 활성화된 창 캡쳐(Capture)하기 and 프린트(Print) 하기 file 뭉충닷컴 2005-05-25 4940
41 이미지의 투명도(transparent) 설정 뭉충닷컴 2005-05-25 5987
40 이미지크기 늘리기 (이미지 크기 변환) 뭉충닷컴 2005-05-25 6102
39 마우스(Mouse)의 X축 Y축 좌표값 구하기 뭉충닷컴 2005-05-24 6982
38 마우스(Mouse)의 오른쪽/ 왼쪽 버튼 바꾸기 뭉충닷컴 2005-05-24 4276
37 마우스(Mouse)의 커서(Cursor) 숨기기/보이기 뭉충닷컴 2005-05-24 6174
36 리스트박스(ListBox) 위에 마우스 올려졌을때 항목 보여주기 뭉충닷컴 2005-05-24 5639
35 마우스(Mouse) 포인터를 컨트롤로 이동 시키기 뭉충닷컴 2005-05-24 5109
34 제목바(Title Bar) 없이 마우스로 폼 드래그해서 폼 이동시키기 뭉충닷컴 2005-05-24 4696
» 마우스(Mouse) 이동 뭉충닷컴 2005-05-24 4559
32 마우스(Mouse)의 버튼수 구하기 - 그 외 기타 시스템 정보 구하는 법 뭉충닷컴 2005-05-24 4513
31 마우스(Mouse)의 더클클릭(Double-Click) 시간 얻어오기 뭉충닷컴 2005-05-24 4243
30 마우스(Mouse)의 더블클릭(Double-Click) 시간 변경 뭉충닷컴 2005-05-24 4990
29 마우스 움직임을 폼안에서만 가능하도록 제한하기 뭉충닷컴 2005-05-24 4620
28 동영상(avi) 파일 재생하기 뭉충닷컴 2005-05-24 6626
27 자신의 PC에 사운드 카드가 설치되어있는지 여부 검사 뭉충닷컴 2005-05-24 4013
26 미디(MIDI) 파일, 웨이브(Wave) 파일 실행 시키기 뭉충닷컴 2005-05-24 5194