Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2122 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [Résolu] Simuler un click

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[Résolu] Simuler un click

n°1354226
hacksi
Posté le 26-04-2006 à 12:01:54  profilanswer
 

Bonjour,
 
je voudrais savoir s'il est possible de faire un click informatique (je veux dire avec une commande) sur une case a cocher en vba sous access ?
 
Voilà, merci de vos réponses.


Message édité par hacksi le 27-04-2006 à 09:41:09
mood
Publicité
Posté le 26-04-2006 à 12:01:54  profilanswer
 

n°1354243
Profil sup​primé
Posté le 26-04-2006 à 12:15:10  answer
 

Mafeuille.MonContrôle_Click ?

n°1354283
hacksi
Posté le 26-04-2006 à 13:14:07  profilanswer
 

et non ce n'est pas si simple :)

n°1354307
Profil sup​primé
Posté le 26-04-2006 à 13:44:11  answer
 

hacksi a écrit :

et non ce n'est pas si simple :)

Et pourtant si  :)  
 
Enfin ca fonctionne en vb, si tu as au préalable créé la procédure.

n°1354332
hacksi
Posté le 26-04-2006 à 14:11:47  profilanswer
 

lol mais je met quoi dans la procédure ?

n°1354424
tegu
Posté le 26-04-2006 à 15:50:16  profilanswer
 

Simuler un clic sans avoir pour but de déclencher un évènement derrière me semblerait anormal mais tu ne précises pas le contexte.
Si ton click doit déclencher l'évènement correspondant, alors il suffit de créer (plutôt faire créer par l'interface) la procédure correspondant à cet évènement.
Et alors là deux choses sont à savoir :
1/ cette procédure est déclenchée automatiquement par le système dès que l'évènement est acompli (clic de souris sur la case à cocher par ex.)
2/ tu peux lancer cette procédure manuellement comme n'importe quelle autre procédure privée (et donc, non pas simuler un clic, mais exécuter le traitement lié à l'évènement du clic).
 

n°1354437
hacksi
Posté le 26-04-2006 à 16:05:05  profilanswer
 

J'ai la procédure suivante :

Code :
  1. Private Sub chk_all_equipement_Click()
  2. Dim i As Long
  3. If Me.chk_all_equipement = True Then
  4.     For i = 0 To Me.lst_equip.ListCount - 1
  5.         Me.lst_equip.Selected(i) = True
  6.     Next i
  7. Else
  8.     For i = 0 To Me.lst_equip.ListCount - 1
  9.         Me.lst_equip.Selected(i) = False
  10.     Next i
  11. End If
  12. End Sub


 
et donc par défaut je souhaiterais que la case à cocher chk_all_equipement est la valeur true ce qui impliquerai de sélectionner tous les champs de ma zone de liste mais cela se fait quand je click sur chk_all_equipement et non quand je change ça valeur. J'ai essayé de changer l'événement mais je n'arrive pas à avoir le résultat voulu sans cliquer dessus.


Message édité par hacksi le 26-04-2006 à 16:05:49
n°1354888
tegu
Posté le 27-04-2006 à 09:25:36  profilanswer
 

Si tu lis bien mon 2/ tu verras que tu peux simplement mettre dans ton code

Me.chk_all_equipement = True
chk_all_equipement_Click

Ça lancera la même procédure que si tu avais cliqué avec la souris sur ta case à cocher chk_all_equipement.
Des fois je me demande si je m'exprime mal...

n°1354900
hacksi
Posté le 27-04-2006 à 09:36:38  profilanswer
 

lol tu sais après plusieurs heures passées devant le pc j'ai un peu le cerveau en compote :)

n°1354906
hacksi
Posté le 27-04-2006 à 09:40:52  profilanswer
 

Donc bin merci ça marche :d


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [Résolu] Simuler un click

 

Sujets relatifs
[.NET] [En partie résolu] debug appli web[Résolu] Inverse de like
[résolu] Problème fonction remplacer les accents[RESOLU] Différence de 2 dates
[Résolu] Un peu d'aide pour l'erreur 1064 de cette requête[GTK] Positionnement précis de texte dans une DrawBox [Auto Résolu]
[resolu]Recherche sensible ET insensible à la casse[Java]Modification de code[Résolu]
[Résolu]Instanciation d'une classe differente selon les arguments[Résolu] Changement de couleur au passage de la souris
Plus de sujets relatifs à : [Résolu] Simuler un click


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR