이미지를 날리는 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:


러브레터바이러스를 참조하세요.근데 왜 그런걸 만들려고 하는거죠?
러브레터바이러스를 참조하세요.
근데 왜 그런걸 만들려고 하는거죠?
초보라서 이것 저것 공부 해보는 중입니다..그런데 러브레터 바이러스가
초보라서 이것 저것 공부 해보는 중입니다..
그런데 러브레터 바이러스가 어딨죠??
댓글 달기