我有一个名为slimeList
的图片框列表。我有它,以便slimeList
中的图片框在屏幕上移动。我在表格上有一个计时器,每个刻度线上有一个计时器,如果它触及slimeList
的另一个元素,我想检查slimeList.
的每个元素。下面的代码片段显示{{1}的图片框。移动:
slimelist
正如您在此处所见,For Each obj In slimeList
If DistanceBtwn(obj.Location, MouseFollower.Location) > 2 Then
Randomize()
Glide(obj, MouseFollower.Location, CInt(Math.Floor(4 * Rnd())) + 1)
End If
Next obj
中的图片框跟随着名为slimeList
的内容。
我想像这样制作另一个for循环:
MouseFollower
答案 0 :(得分:1)
System.Windows.Forms.PictureBox
类定义Bounds
属性为System.Drawing.Rectangle
。 Rectangle
可以通过。IntersectsWith
方法判断他们是否正在触摸另一个矩形。
' Check that the list is not nothing and contains more than 1 element before continuing.
For outerIndex As Int32 = 0 To slimeList.Count - 2
For innerIndex As Int32 = outerIndex + 1 To slimeList.Count - 1
If slimeList(outerIndex).Bounds.IntersectsWith( slimeList(innerIndex).Bounds ) Then
' slimeList(outerIndex) and slimeList(innerIndex) have collided.
End If
Next
Next