Access 2000 の VB での テーブル作成について質問です。

質問

下記のようにAccess 2000のVBからDAOを使ってテーブルを作っておりますが、
作るフィールドに規定値の設定もVBからできないのでしょうか？DAOだと無理なのでしょぅか？
教えてください

Dim db As DAO.Database
Dim tbdef As DAO.TableDef

Dim flID As DAO.Field

Set db = CurrentDb
Set tbdef = db.CreateTableDef("テーブル")

Set flID = tbdef.CreateField("ID", dbInteger)
　　tbdef.Fields.Append flID
　　db.TableDefs.Append tbdef
db.Close: Set db = Nothing

回答No.1

kumadayo · ベストアンサー

flID.DefaultValue = 7
見たいな感じでできると思います＾－＾

お礼

ありがとうございますヾ(≧▽≦)ノ