А зачем здесь поле ID нужно? Есть же Handle() и без всяких переборов.
Когда создаешь бота - возвращаешь его порядковый номер в списке, который и будет являться ID:
A.Bot = New Bot
ID = Handle(A)
А когда нужно передвинуть бота - вытаскиваешь его из списка и двигаешь
A.Bot = Object.Bot(ID)
If (A <> Null) Then
PositionEntity(A\Model, X, Y, Z)
Else
CreateBot()
EndIf