[vba access] controle créer à la volée avec evenement

controle créer à la volée avec evenement [vba access] - VB/VBA/VBS - Programmation

Marsh Posté le 24-07-2006 à 18:28:37    

Bonjour,
  Je doit créer sur un formulaire un nombre indéfini de Label (entre 10 et 30) à chaque ouverture.
  Ca je sais faire avec createcontrol
 
  A présent je souhaite que chaqun de ces Label aient 2 événement onmouseup et onmousedown
  j'ai bien penser à fair un Monlabel.onMouseUp = "=mon_mouseup()" sur chaque controle créer (ce qui marche) mais comment récuperer les evenements traditionnel du mouseUp (Button As Integer, Shift As Integer, X As Single, Y As Single)
 
 
des idées ???
 
 
Pierre
 
 
--
1g6 ,société services et de formations en logiciels libre (http://formation.1g6.biz)

Reply

Marsh Posté le 24-07-2006 à 18:28:37   

Reply

Marsh Posté le 25-07-2006 à 01:14:44    

pour réponse à moi meme  et cloturer le message, c'est possible en utilisant la fonction CreateEventProc : http://msdn.microsoft.com/library/ [...] ntProc.asp
Mais c'est pas pratique du tout car la l'ajout des label se fait en mode création et si en quittant le formulaire y'a sauvegarde ca enregistre tout le code généré automatique par CreateEventProc, et y'aura conflit à l'ouverture suivant de la form.
J'ai donc choisi la solution comme bcp de créer par avance une 30aine d'evanement sur des label qui se créont en auto à l'ouverture de la form.
si besoin de plus d'info le site de ma boite où y'a mes coordonnées http://formation.1g6.biz
 
MAJ : Par contre le truc pas beau du tout c'est que de créer des fonctions en avance sans que les labels existent, et bien ca compile pu !!! Je ne sais pas quel problème est ce que ca posera à termes ?
 
Pierre


Message édité par PierreC le 25-07-2006 à 10:00:07

---------------
Du tofu en Alsace : www.tofuhong.com
Reply

Marsh Posté le 12-09-2006 à 16:46:24    

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed