Code pour le cumul

mohalesage Messages postés 147 Date d'inscription   Statut Membre Dernière intervention   -  
mohalesage Messages postés 147 Date d'inscription   Statut Membre Dernière intervention   - 13 avril 2013 à 22:38
Bonjour,

je tente d'afficher sur une zone de text le cumul d'une série de résultat, mais jusqu'à maintenant, je n'ai pas arrivé à le faire.

je vous remercie d'avance pour votre aide






A voir également:

3 réponses

irongege Messages postés 41001 Date d'inscription   Statut Modérateur Dernière intervention   5 076
 
Bonjour

Et si tu nous mettais ce que tu as codé ?
0
mohalesage Messages postés 147 Date d'inscription   Statut Membre Dernière intervention   1
 
Bonjour l'Ami

Voilà ce que j'ai écris comme code, sans résultat

THNMATIN est l'identifiant du total des heures du matin dans la BD
THNAPM est l'identifiant du total des heures de l'après midi dans la BD

lblTHnJ est l'objet pour l'affichage du total des heures du Matin et d'après midi.
Son identifiant dans la BD est THNJ





Dim y As Date
Dim THNMATIN, THNAPM


RS.Open

y = RS![THNMATIN] + RS![THNAPM]
lblTHnJ.Caption = y

RS.Close



Merci d'avance
0
mohalesage Messages postés 147 Date d'inscription   Statut Membre Dernière intervention   1
 
Enfin les mais, j'ai trouvé la solution, mais n'empêche pas de me faire des remarques, si elle y en a.


Dim FirstNumber As Date
Dim SecondNumber As Date
Dim Result As Date
Dim y As Date

FirstNumber = CDate(lblTHnM)
SecondNumber = CDate(lblTHnApm)
Result = CDate(lblTHnM) + CDate(lblTHnApm)

RS.Open

y = Result
lblTHnJ.Caption = y

RS.Close




Merci quand même,
je tente maintenant de réussir le code du cumul de la période


votre aide est la bienvenue
0