Bonjour à tous,

J'ai quelques problèmes avec l'utilisation de la fonction Focus.
J'ai un plateau de jeu avec des pions, j'utilise une procédure (que je vais appeler procPlacementPion) qui fait avancer mon pion selon un nombre de cases passé en paramètre. Voilà en gros le fonctionnement de la fonction :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Private Sub procPlacementPion(ByVal intNbCases As Integer)
	dim i as Integer
	For i = 0 To intNbCases - 1
		' Calcul de la nouvelle position
		' Placement du pion
 
		btnPion.Focus()
	Next
End Sub
En fait je veux donner le focus au bouton du pion à chaque déplacement (pour les personnes qui n'ont pas une résolution d'écran assez importante pour afficher la totalité du plateau et qui n'ont pas le pion en vue au moment du déplacement).
Le problème que je rencontre est que le seul focus pris en compte est le dernier.
Il doit y avoir un aspect de la fonction Focus que je ne connais pas. Elle n'est pas instantanée ? Il faut que toutes les instructions soient finies pour "voir" le résultat ?

Merci à ceux qui me liront.