Probleme d'affichage nombre avec virgule
Résolu/Fermé
A voir également:
- Probleme d'affichage nombre avec virgule
- Affichage double ecran - Guide
- Nombre facile - Télécharger - Outils professionnels
- Problème affichage fenêtre windows 10 - Guide
- Windows 11 affichage classique - Guide
- Le nombre de tentatives de déverrouillage incorrectes est trop élevé samsung ✓ - Forum Samsung
2 réponses
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
Ambassadeur
1 554
Modifié le 25 janv. 2021 à 14:04
Modifié le 25 janv. 2021 à 14:04
bonjour,
quand te donne-t'il le résultat souhaité?
que sont MontantTtc et TxtNbProduits?
tu ne nous montres pas comment tu affiches la valeur de MontantExact.
quand te donne-t'il le résultat souhaité?
que sont MontantTtc et TxtNbProduits?
tu ne nous montres pas comment tu affiches la valeur de MontantExact.
bonjour
pour une meilleur comprehension, voici ce code
Dim db As DAO.Database
Dim idcmd As Integer
Set db = CurrentDb
Dim req As String
Dim rs As Recordset
''''''''''''''''''''ajouter dans la table t_mes_donnees'''''''''''''''''''''''''''
Dim rscommande As Recordset
Set rscommande = db.OpenRecordset("t_mes_donnees", dbOpenTable)
rscommande.AddNew
idcmd = rscommande("id_donnees")
rscommande("montantttc") = Me.txtmontantTTC
rscommande("nbproduits") = Me.TxtNbproduits
rscommande("montantexact") = Round((Me.txtmontantTTC / Me.TxtNbproduits), 2)
rscommande.Update
rscommande.Close
Set rscommande = Nothing
ou voici mon fichier access https://www.cjoint.com/c/KAzqrV3z1Jc
pour une meilleur comprehension, voici ce code
Dim db As DAO.Database
Dim idcmd As Integer
Set db = CurrentDb
Dim req As String
Dim rs As Recordset
''''''''''''''''''''ajouter dans la table t_mes_donnees'''''''''''''''''''''''''''
Dim rscommande As Recordset
Set rscommande = db.OpenRecordset("t_mes_donnees", dbOpenTable)
rscommande.AddNew
idcmd = rscommande("id_donnees")
rscommande("montantttc") = Me.txtmontantTTC
rscommande("nbproduits") = Me.TxtNbproduits
rscommande("montantexact") = Round((Me.txtmontantTTC / Me.TxtNbproduits), 2)
rscommande.Update
rscommande.Close
Set rscommande = Nothing
ou voici mon fichier access https://www.cjoint.com/c/KAzqrV3z1Jc
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
1 554
25 janv. 2021 à 17:20
25 janv. 2021 à 17:20
quand te donne-t'il le résultat souhaité?
ERIC
>
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
25 janv. 2021 à 17:22
25 janv. 2021 à 17:22
lorsque j'appuie sur le bouton se trouvant dans le formulaire commande
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
1 554
>
ERIC
25 janv. 2021 à 17:25
25 janv. 2021 à 17:25
tu écris: "ce code me donne donne un valeur exacte. Mais parfois non.".
explique le "parfois": quand est-ce exact, quand ne l'est-ce pas?
explique le "parfois": quand est-ce exact, quand ne l'est-ce pas?
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
1 554
25 janv. 2021 à 17:22
25 janv. 2021 à 17:22
je ne peux que t'inviter à examiner le type du champ "montantexact".
ERIC
>
yg_be
Messages postés
23352
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 novembre 2024
25 janv. 2021 à 17:32
25 janv. 2021 à 17:32
merci infiniment. jai mis reel double et ca marche. merci encore