dim SQL as String
dim rs As Recordset
SQL = " SELECT SGN(フィールド名) FROM テーブル名 "
又は、
SQL = " SELECT SGN(フィールド名) AS 名前 FROM テーブル名 "
Set rs = CurrentDb.OpenRecordset(SQL)
SGN （サイン）で、正負か0かを調べることができます。
例: SQL = " SELECT SGN(電圧) AS ポート電圧 FROM 制御基板 "
制御基板テーブルの電圧フィールドの正負状態を取得します。
取得値はポート電圧の名前になります。
フィールド値「 0 , -1 , 2 , -3 , 4 」の実行した場合、「 0 , -1 , 1 , -1 , 1 」になります。