Discussion :

[argyronet]

Bonjour à toutes et à tous,

Le forum offre depuis quelque temps déjà, un système qui permet de recueillir votre avis sur nos articles publiés pour vous ; aussi, pour satisfaire cette fonctionnalité, je prends l'inititive de ressortir cet article afin qu'il puisse en bénéficier...

Je vous rermercie de bien vouloir laisser vos commentaires / avis / remarques sur le tutoriel suivant :

Création d'une calculatrice pour vos applications Access

Merci

Argy

[MONANGE]

Bonsoir,
J' ai crée un calculette en m'inspirant très largement de votre Tuto, je ne suis pas très doué en VBA et bien qu' il me semble avoir respecté vos consigne
cela ne fonctionne pas les touches - = sont inactive
pouvez vous m'aider
Merci
je vous joins un zip de na base
Cordialement

[marot_r]

Bonjour.

Sympa comme programme.

personnellement j'aurai mutualisé le code des boutons "chiffre" avec quelque chose comme :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub btnChiffre_Click(prmChiffre as long)
   FlagActionButtons cstr(prmChiffre)
   KeepFocus "btn" & cstr(prmChiffre) 
   ConvertToFRF
end sub

et l'utilisation.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub btn0_Click()
''' Bouton 0 appuyé
'''------------------------
   call btnChiffre_Click(0)
End Sub

Et je pense qu'on peut faire la même chose avec les touches des oppérations.

A+

[argyronet]

Bonjour,

Et je pense qu'on peut faire la même chose avec les touches des oppérations.

Oui, merci pour la suggestion...
Ce serait aujourd'hui, j'aurais fait encore plus simple.
Ce tuto a 12 ans et le programme inital, bien plus ; entre temps, j'ai un peu évolué

Argy

[MONANGE]

Bonsoir,

Merci d'avoir pris le temps de me répondre; en effet , ça fonctionne maintenant
Je suis à la retraite et je me passionne pour Access un moyen comme un autre de faire travailler la tête, et j'avance grâce à ce forum, et aux excellents Tutos
j'ai crée mon Agenda mon gestionnaire de compte banque adapté à mes besoins
cordialement
Angel

[kabamel]

salut, pouvez mettre en ligne la mise à jour (c'est à dire la version 64 bits) ?

[argyronet]

Bonjour,

....bien qu' il me semble avoir respecté vos consigne cela ne fonctionne pas les touches - = sont inactive

Le bouton - n'a pas de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub Ctl_btnSubst_Click()
 
End Sub

Cela explique pourquoi ça ne fonctionne pas...

Argy