NHenry
Messages postés15113Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention22 avril 2024159 13 avril 2013 à 22:33
Bonjour,
"RS.Open"
Tu veux ouvrir quoi ?
Es-tu bien en VB6 et pas en VBA ?
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site
Bonjours les amis,
Enfin, j'ai trouvé la solution de la somme, voilà le code :
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