Création d'un champ

Bonjour

Je souhaite créer en VB6 un champ dans une table Microsoft Access 2000
Le champ est de type Entier Double

Mon problème est que je souhaite gérer 2 décimales pour ce champ et
lorsque je crée mon champ
il me mets les décimales en "Auto"

Voici mon bout de code :

' - Création Table Constituants -

Set t = Db.CreateTableDef("Constituants1")

'Id : NuméroAuto + PrimaryKey
Set f = t.CreateField("Id", DAO.DataTypeEnum.dbLong)
f.Attributes = DAO.dbAutoIncrField
t.Fields.Append f

Set ix = t.CreateIndex("PrimaryKey")
With ix
.Fields.Append .CreateField("Id")
.Primary = True
End With
t.Indexes.Append ix

'Flux : Numérique + Décimal Auto
Set f = t.CreateField("Flux", DAO.DataTypeEnum.dbLong)
f.DefaultValue = 0
t.Fields.Append f

'Composant : Numérique + Décimal Auto
Set f = t.CreateField("Composant", DAO.DataTypeEnum.dbLong)
f.DefaultValue = 0
t.Fields.Append f

'Pourcentage : Réel double + 2 Décimals
Set f = t.CreateField("Pourcentage",
DAO.DataTypeEnum.dbDouble)
f.DefaultValue = 0
t.Fields.Append f

Db.TableDefs.Append t

Db.TableDefs.Refresh

?? Comment lui indiquer que le champ "Pourcentage" doit avoir seulement
2 décimales ??

Merci d'avance