Tips20 - SQL文 別名でフィールドの値を抽出する

Dim SQL as String
Dim rs As Recordset
SQL = "SELECT フィールド名 AS 別名 FROM テーブル名"
Set rs = CurrentDb.OpenRecordset(SQL)
フィールド名に別名を付けるには「AS」を使います。

例：SQL = "SELECT name AS 名前 FROM T_顧客"
nameフィールドを名前に列名を変更しています。