이미지를 날리는 VB용프로그램 질문입니다.
글쓴이: hakkyoku / 작성시간: 일, 2004/01/18 - 6:29오후
비주얼 베이직 프로그램을 막 시작한 초보입니다..
다음은 폼 중 타이머의 부분입니다.
Private Sub tmrBfly_Timer() Static blnBmp As Boolean If imgBfly.Left > frmBfly.ScaleWidth Then imgBfly.Move 0 - imgBfly.Width End If If imgBfly.Top < 0 - imgBfly.Height Then imgBfly.Move imgBfly.Left, frmBfly.ScaleHeight Else End If imgBfly.Move imgBfly.Left + 20, imgBfly.Top - 5 If blnBmp Then 'If blnBmp = True Then과 동등 imgBfly.Picture = imgOpen.Picture Else imgBfly.Picture = imgClose.Picture End If blnBmp = Not blnBmp End Sub
이 코드를 사용하면 이미지가 폼의 끝부분에 도착하면 바닥에서 부터 다시
올라오게 되어 있습니다.
이걸 개조하여 화면끝(위,아래,왼쪽,오른쪽,)에 닿으면 반대방향으로 튕겨나도록
개조하고 싶은데 저의 짧은 프로그램 실력으론 도저히 방법을 모르겠습니다. 여러
고수님들의 도움 부탁드립니다.
Forums:
러브레터바이러스를 참조하세요.근데 왜 그런걸 만들려고 하는거죠?
러브레터바이러스를 참조하세요.
근데 왜 그런걸 만들려고 하는거죠?
초보라서 이것 저것 공부 해보는 중입니다..그런데 러브레터 바이러스가
초보라서 이것 저것 공부 해보는 중입니다..
그런데 러브레터 바이러스가 어딨죠??
댓글 달기