Generel spiludvikling

Undskyld, men picBoxB4 ligger selvfølgelig til VENSTRE for picBoxB5...

Du kan vel bare spørge på .top og .left på komponenterne for at se hvor de er i forhold til hinanden?

Du kan bruge denne lille funktion, eller du kan skrive koden hvor du skal bruge oplysningerne:

Jeg antager at dine picboxe er i et ControlArray med index 0 til 399.
Jeg antager også at de ligger fra øverste venstre hjørne til nederste højre hjørne.

Private Function GetXY(ByVal iNumPicBox As Integer) As Integer()
    Dim iOutArr(1) As Integer
   
    iOutArr(0) = (iNumPicBox Mod 20) + 1
    iOutArr(1) = Int(iNumPicBox / 20) + 1
    GetXY = iOutArr

End Function

Funktionen returnerer et array med 2 elementer: X og Y position:

    fra (1,1) til (20,20)

Nu kan du jo nemt sammenligne X'er (højre/venstre)
og                            Y'er (over/under)


/tjacob