Format Table field to percent

[timotai]

HI all

I am using the following code to create a table:

    Set dbs = CurrentDb
    Set tdf = dbs.CreateTableDef(tabname)
    Set fld = tdf.CreateField("system", dbText, 30)
    tdf.Fields.Append fld
    Set fld = tdf.CreateField("Potential_Availability", dbText, 30)
    tdf.Fields.Append fld
    Set fld = tdf.CreateField("Actual_Availability", dbText, 30)
    tdf.Fields.Append fld
    Set fld = tdf.CreateField("SLA", dbDouble, 30)
    tdf.Fields.Append fld
    dbs.TableDefs.Append tdf
    Set dbs = Nothing

I want to change the SLA field to format as percent. How can I do this?

Thanks

Tim

 

[PHV]

Take a look at the Properties collection of the DAO.Field object.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244