即効テクニック |
●概要● 構文 expression.Name 取得/設定 設定項目 内容 expression Fieldオブジェクトを指定[省略不可] Fieldsコレクションにはテーブルを構成するFieldオブジェクトが含まれています。FieldオブジェクトのNameプロパティを使用して、指定したテーブル内のフィールド名の一覧を取得できます。FieldsコレクションはTableDefオブジェクトのFieldsプロパティで参照します。 ここでは、TableDefオブジェクトに「社員テーブル」を指定し、For Each...NextステートメントでFieldsコレクション内のFieldオブジェクトのNameプロパティの値を表示します。 ●設定● 動作確認をするためには、Visual Basic Editorのメニューから[ツール]→[参照設定]コマンドを選択し、[参照設定]ダイアログボックスで「Microsoft DAO 3.6 Object Library」にチェックを入れてください。 ●サンプル● Public Sub GetFieldNameSample() Dim myDB As Database Dim myTD As TableDef Dim myFild As Field 'カレントデータベースを変数に代入する Set myDB = CurrentDb 'フィールドを表示するテーブルを変数に代入する Set myTD = myDB.TableDefs!社員テーブル '[社員テーブル]のフィールドを表示する For Each myField In myTD.Fields Debug.Print myField.Name Next End Sub