dim SQL as String
dim rs As Recordset
SQL = " SELECT (フィールド名 MOD フィールド名) AS 名前 FROM テーブル名 "
又は、SQL = " SELECT (フィールド名 MOD 数値) AS 名前 FROM テーブル名 "
又は、SQL = " SELECT (数値 MOD フィールド名) AS 名前 FROM テーブル名 "
Set rs = CurrentDb.OpenRecordset(SQL)
MODは除算の余りを返します。
例: SQL = " SELECT ( 重量 MOD 30 ) AS 重量余り FROM 仕様 "
仕様テーブルの重量フィールドを30で割った余りを取得します。
取得値は重量余りの名前になります。
フィールド値「100,200,300」の重量で実行した場合、「10,20,0」になります。