erefdatacomputing
Messages postés165Date d'inscriptionmardi 7 mars 2006StatutMembreDernière intervention24 avril 2018
-
10 déc. 2007 à 00:12
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
10 déc. 2007 à 07:17
Bonjour à Tous ...
Voila mon pb ...Je crée, via VB6, une table dans une bdd access.
Cette table possède plusieurs champs, et pour certains de ces champs (qui sont numériques), je voudrais indiquer (via VB6) le nb de décimales, et formater ces champs à 2 chiffres après la virgule (style "###0.00").
voiçi le bout de mon code, qui crée la table et les champs ...
Set db = OpenDatabase("C:\rfdc\Logémag8\bdd\G.mdb")
Set tb = db.CreateTableDef("devis1")
Set f = tb.CreateField("lbl", dbText)
tb.Fields.Append f
Set f = tb.CreateField("pvht", dbDouble)
tb.Fields.Append f
Set f = tb.CreateField("q", dbDouble)
tb.Fields.Append f
Set f = tb.CreateField("totlght", dbDouble)
tb.Fields.Append f
db.TableDefs.Append tb
db.TableDefs.Refresh
db.Close
Ce sont les 3 champs "dbDouble" que je voudrais formater style "###0.00"
Merçi !!
Je comprends vite mais il faut m'expliquer longtemps et tout en détails !!!
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 10 déc. 2007 à 07:17
salut,
une tablea access ne va pas faire la différence ni conserver ton double formaté.
tu vas devoir tricher en l'enregistrant comme string [Text(7)]
++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp