SQL フィールドに式を設定し値を抽出する

フィールド名に式を設定し、ASで列見出し名を指定

SELECT 国語 + 数学 + 英語 AS 合計点 FROM テーブル名
上のようにフィールド名に式を設定し、ASで列見出し名を指定します

Home　

SQL Tips

サンプルソフト
［実行後の成績一覧画面］
成績　合計点

［T_成績テーブル］
生徒ID　国語　数学　英語
10　　　　　95　　90　　92
11　　　　　80　　85　　96
13　　　　　77　　89　　52
16　　　　　78　　65　　88

［コード］
Option Compare Database

Private Sub コマンド8_Click()
    Dim SQL As String
    Dim rs As Recordset
    Me!テキスト1 = "ID：合計点" & vbCrLf
    Me!テキスト1 = Me!テキスト1 & "---------" & vbCrLf
    SQL = "SELECT 生徒ID,国語 + 数学 + 英語 AS 合計点 FROM T_成績"
    Set rs = CurrentDb.OpenRecordset(SQL)
    Do Until rs.EOF
        Me!テキスト1 = Me!テキスト1 & rs![生徒ID] & "：  " & rs![合計点] & vbCrLf
        rs.MoveNext
    Loop
    Set rs = Nothing
End Sub

サンプルソフトのダウンロード

Home　

SQL Tips