■ 레이블 안에서 움직이는 이미지 ● 문제개요 비쥬얼 베이직을 이용하여 레이블 안에 이미지를 움직이게 하고, 배경색을 바꾸는 프로그램을 만든다 ○ 프로그램 설명 번 호컨트롤명설 명1chkUpper이미지의 이동방향을 위로 설정2chkLower이미지의 이동방향을 아래로 설정3chkRight이미지의 이동방향을 오른쪽으로 설정4chkLeft이미지의 이동방향을 왼쪽으로 설정5optRed레이블의 배경색을 빨간색으로 바꾼다 6optYellow레이블의 배경색을 노란색으로 바꾼다7optGreen레이블의 배경색을 초록색으로 바꾼다8optBlue레이블의 배경색을 파란색으로 바꾼다9optSpeed100이미지 이동속도를 느리게 한다10optSpeed300이미지 이동속도를 중간으로 한다11optSpeed500이미지 이동속도를 빠르게 한다12cmdMove이미지를 이동시킨다13cmdReset움직인 이미지를 처음 위치로 되돌린다14cmdStop움직이는 이미지를 멈춘다15cmdEnd프로그램을 종료시킨다16lblField이미지가 움직이는 레이블17img5pgif움직일 이미지18tmrMOver이미지의 움직이는 속도를 위한 타이머 ● 알고리즘 cmdMove를 누르면 프로그램은 속도와 방향을 체크한다. Dim iMover As Integer `속도를 저장하기 위한 변수 Dim bSpeedCheck As Boolean `속도를 체크했는지 확인하는 변수 Dim bDirectionCheck As Boolean `방향을 체크했는지 확인하는 변수 위의 세변수는 속도와 방향 체크 여부를 확인하고 속도를 정해주는 역할을 한다. 우선 bSpeedCheck은 속도를 정했는지를 검사하여 검사하였으면 True, 안했으면 False로 정해져서 False은 경우에는 속도를 체크하라는 msgbox를 띄운다. bDirectionCheck은 방향을 정했는지를 판단하고, 정하지 않았으면 방향을 정하라는 msgbox를 띄운다. 두 변수 모두...
· 해피레포트는 다운로드 받은 파일에 문제가 있을 경우(손상된 파일/설명과 다른자료/중복자료 등) 1주일이내 환불요청 시 환불(재충전) 해드립니다.
(단, 단순 변심 및 실수로 인한 환불은 되지 않습니다.)
· 파일이 열리지 않거나 브라우저 오류로 인해 다운이 되지 않으면 고객센터로 문의바랍니다.
· 다운로드 받은 파일은 참고자료로 이용하셔야 하며,자료의 활용에 대한 모든 책임은 다운로드 받은 회원님에게 있습니다.
저작권안내
보고서 내용중의 의견 및 입장은 당사와 무관하며, 그 내용의 진위여부도 당사는 보증하지 않습니다.
보고서의 저작권 및 모든 법적 책임은 등록인에게 있으며, 무단전재 및 재배포를 금합니다.
저작권 문제 발생시 원저작권자의 입장에서 해결해드리고 있습니다. 저작권침해신고 바로가기