code pour le cumul

Question

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






Configuration: Windows XP / Chrome 26.0.1410.64

irongege · Answer

Bonjour

Et si tu nous mettais ce que tu as codé ?

mohalesage · Answer

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

mohalesage · Answer

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

Code pour le cumul

3 réponses

Discussions similaires

Newsletters