adding fields

How can i make to allow the user to insert or delet datafields?I'm using the the most simple mode, with mdb files and data control. Thanks for helping!

Here's code that will add a field to an Access .MDB file using Jet/DAO:

' Assume that Db is an open database and that you're adding
' fields to the "System" table.......

Dim Td As TableDef
Dim F As Field
Set Td = Db.TableDefs("System")

' Add a Text field
Set F = Td.CreateField("NewTextField", dbText, 25)
F.AllowZeroLength = True
Td.Fields.Append F
' Add a Boolean field
Set F = Td.CreateField("NewBooleanField", dbBoolean, 0)
Td.Fields.Append F
Td.Close

Helmar B. Herman, VP ProtoProducts