Also, ich hab da z.b. einen Button. Der bewege ich mit Random zufällig in dern Form. Aber anstatt überall auf der Form auf zu tauchen soll er im rot markierten Feld bleiben und nicht darüber gehen.
Private Sub Button_Click(...) Handles Button.Click
Button.Location = SetPosition(0, 0, 0, 0) //hier musste halt selbst schauen wo der Bereich ist.
End Sub
Public Function SetPosition(minX As Int32, maxX As Int32, minY As Int32, maxY As Int32) As Point
Dim rndX As New Random
Dim rndY As New Random
Return New Point(rndX.Next(minX, maxX), rndY.Next(minY, maxY))
End Function