visual basic,비주얼베이직,vb .net강좌-충돌테스트,충돌감지,Collide Detection,Crash sensor,Collision,game,Bounds,IntersectsWith
위와 같이 콘트롤을 배치합니다. Public Class Form1 Private Sub Form1_MouseMove(sender As Object, e As MouseEventArgs) Handles Me.MouseMove b2.Location = New Point(e.X, e.Y) Collision(b1, b2) End Sub Public Sub Collision(ByVal a As Object, ByVal b As Object) If a.Bounds.IntersectsWith(b.Bounds) Then Label1.Text = "Collision" Else Label1.Text = "No Collision" End If End Sub End Class
2017. 2. 8.
