[비주얼베이직]비주얼베이직 마우스 이벤트
- 최초 등록일
- 2006.07.08
- 최종 저작일
- 2006.05
- 압축파일
- 가격 1,000원
소개글
화면에 여백을 클릭하면 현재 좌표와 왼쪽버튼으로 클릭하였는지 오른쪽버튼을 클릭하였는지 메시지박스로 보여주는 프로그램입니다.
화면에 있는 그림을 클릭하면 현재좌표와 그림을 클릭하였다는 메시지를 보여줍니다.
컴파일 실행환경
visual basic
본문내용
If judge = 1 Then `클릭한게 폼이면.
Select Case intButton
Case vbKeyLButton
MsgBox "왼쪽 버튼을 클릭하였습니다." + vbCr + vbLf + "X = " + _
Str(P_X) + ", Y = " + Str(P_Y)
Case vbKeyRButton
MsgBox "오른쪽 버튼을 클릭하였습니다." + vbCr + vbLf + "X = " + _
Str(P_X) + ", Y = " + Str(P_Y)
Case vbKeyMButton
MsgBox "가운데 버튼을 클릭하였습니다." + vbCr + vbLf + "X = " + _
Str(P_X) + ", Y = " + Str(P_Y)
End Select
ElseIf judge = 2 Then `클릭한게 이미지이면
Select Case intButton
Case vbKeyLButton
MsgBox "그림을 왼쪽 버튼으로 클릭하였습니다." + vbCr + vbLf + "X = " + _
Str(P_X) + ", Y = " + Str(P_Y)
압축파일 내 파일목록
1번과제.frm
1번과제.exe
참고 자료
없음