si je devine ce que tu veux faire, c'est une sorte de jauge des points de vie, avec un certain nombre de rectangles dessinés en fonction de la variable donnée. Si c'est ça, il ne faut surtout pas utiliser des labels! des shapes à la limites...
non, sans rire, il faut dessiner tes rectangles, pas créer des objets (label ou autres). ex :

for i=1 to PtsDeVie
  me.line(0,MaxY-i*10)-(20,MaxY-i*10+8),vbred,bf
next

ça te dessine un empilement vertical de rectangles de 20 pixels de large et 8 de haut, avec un petit espace entre chacun