Accessのテーブル定義作成をVBAから行う

質問

こんばんは

フィールド定義の方法はネットで検索してある程度分かりました。
しかし、次の指定が解りません。
値要求と空文字列の許可です。
指定しないとどちらもいいえになります。はいにするにはどうすればよいのでしょうか。

今は次のようにしています。
Dim Table As DAO.TableDef
Dim Field As DAO.Field
Set Field = Table.CreateField("フィールの名称", dbText, 文字列の長さ)
Table.Fields.Append Field

回答No.1

mitarashi · ベストアンサー

こんなところでいかがでしょうか。ご参考まで。
Sub test()
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", dbText, 20)
flID.Required = True '値要求
flID.AllowZeroLength = True '空文字列の許可
tbdef.Fields.Append flID
db.TableDefs.Append tbdef
db.Close
Set db = Nothing
End Sub

お礼

ありがとうございます。
確認しました。