QQ를 통해 연락주시면 문제가 해결되는 중입니다. . .
splitimage_MouseDown에 코드 한 줄을 추가하세요:
Private Sub Splitimage_MouseDown(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single) p >
splitimage(Index).Print Index
If DoesControlExist(splitimage(splitx * splity)) Then
스플리트 이미지(splitx * splity) 언로드
End If
splitimage(splitx * splity) 로드
splitimage(splitx * splity) = Splitimage(Index)
splitimage(splitx * splity).Visible = True
splitimage(Index).ZOrder (0) '새 코드입니다!
자막 종료