change to standard format

Set tbl = db.TableDefs("Invoice")

tbl.Fields.Append tbl.CreateField("amount", dbCurrency)

the above code is working well.
However, the below code, I cannot change the format (standard), no dollar sign.

tbl.Fields("amount").Properties("Format") = "Standard"

The message said that "property no found"
What's wrong with it?
How can I change the format (standard)?
Please let me know, thanks.

Not all properties are created when a field is created: some are only
created when they're required.

Try the following:

Dim fld As DAO.Field
Dim prp As DAO.Property

Set tbl = db.TableDefs("Invoice")
Set fld = tbl.CreateField("amount", dbCurrency)
Set prp = fld.CreateProperty("Format", dbText, "Standard")
fld.Properties.Append prp
tbl.Fields.Append fld


--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no private e-mails, please)


"accessman2" wrote in message
. ..

Set tbl = db.TableDefs("Invoice")

tbl.Fields.Append tbl.CreateField("amount", dbCurrency)

the above code is working well.
However, the below code, I cannot change the format (standard), no
dollar sign.

tbl.Fields("amount").Properties("Format") = "Standard"

The message said that "property no found"
What's wrong with it?
How can I change the format (standard)?
Please let me know, thanks.


--
accessman2

On Sun, 29 Jan 2006 16:44:49 +0000, accessman2
wrote:


Set tbl = db.TableDefs("Invoice")

tbl.Fields.Append tbl.CreateField("amount", dbCurrency)

the above code is working well.
However, the below code, I cannot change the format (standard), no
dollar sign.

tbl.Fields("amount").Properties("Format") = "Standard"

The message said that "property no found"
What's wrong with it?
How can I change the format (standard)?
Please let me know, thanks.

You may need to add the Format property to the field - if there is
none, it's not there to change.

However, the format of a Table field is - generally - completely
irrelevant. You shouldn't be displaying data in Tables in any case;
and you can easily set the format property of a Form or Report textbox
in which you're displaying the [Amount] field.


John W. Vinson[MVP]