728x90









GetCursorPos API는 마우스의 자표값을 알려주는 API이다.

Private Declare Function GetCursorPos Lib "user32.dll" (ByRef lpPoint As POINTAPI) As Long
Private Type POINTAPI
    x As Long
    y As Long
End Type

Private Sub Timer1_Timer() 'Timer1.Interval = 1
Static MP As POINTAPI
GetCursorPos MP
    Form1.Cls
    Print MP.x
    Print MP.y
End Sub

GetCursorPosAPI예제.zip

'2020 이전 자료 > Visual Basic 6.0' 카테고리의 다른 글

GetPixel API 사용방법 ( 픽셀색추출해보자 )  (0) 2008.10.27
GetWindowRect API 사용방법 ( 바탕화면해상도구하기 )  (0) 2008.10.27
GetDC API, GetWindowDC API 사용해보자 ( DC값구하기 )  (0) 2008.10.27
GetDesktopWindow API 사용방법 ( 데스크탑핸들구하기 )  (0) 2008.10.27
VB 유마일 프리셋 쉽게 수정하기 Upgrade  (0) 2008.10.12
VB 로또번호 생성기  (5) 2008.10.10
FindWindow API 사용방법 (타이틀값으로 핸들값구하기)  (0) 2008.09.26
VB LEN() 과 LENB()의 차이점  (0) 2008.08.26
VB UNLOAD , HIDE , SHOW 사용방법  (0) 2008.08.11
728x90

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, _
ByVal lpWindowName As String) _
As Long '선언하시는곳은 맨위에 적어주세요. 모듈에 해주실꺼면 Private -> Public 고쳐주세요

사용방법 :
FindWindow(lpClassName, lpWindowName)
이런식으로 사용합니다.

예시 -
Debug.Print FindWindow("BuddyBuddy", "버디버디") '디버그창에다가 핸들값 출력
MsgBox FindWindow("BuddyBuddy", "버디버디") '메세지창으로 핸들값 출력

lpClassName : 클레스네임
pWindowName : 윈도우에 표시되는 이름

클레스네임이나 윈도우 네임을 모를때 쓰는 함수 : vbNullString

사용법 :  

FindWindow("vbNullString", lpWindowName)
FindWindow(lpClassName, "vbNullString")

'2020 이전 자료 > Visual Basic 6.0' 카테고리의 다른 글

GetDesktopWindow API 사용방법 ( 데스크탑핸들구하기 )  (0) 2008.10.27
GetCursorPos API 사용 예제 ( 마우스좌표값알아내기 )  (0) 2008.10.27
VB 유마일 프리셋 쉽게 수정하기 Upgrade  (0) 2008.10.12
VB 로또번호 생성기  (5) 2008.10.10
VB LEN() 과 LENB()의 차이점  (0) 2008.08.26
VB UNLOAD , HIDE , SHOW 사용방법  (0) 2008.08.11
VB 드랍드롭을 이용해 리스트박스에 파일명출력하기!  (1) 2008.08.11
VB 문자열 함수  (0) 2008.07.31
VB 폴더명 저장 프로그램 // 프로그램이 깔려있는곳,  (0) 2008.07.19

+ Recent posts

티스토리툴바