vb6.0です。OSはXP professional version2002 servicepack3。vb初心者です。
アクセスのあるテーブル年度別係数のフィールド卸売物価（データ型数値型）、フィールド年（データ型数値型）とします。
で、CreateField("年",dbInteger)であるデータベースにフィールドをつくり、それをもとにdaorec3という、DAO.Recordsetをつくります。
そして、
SELECT 卸売物価 FROM 年度別係数 WHERE 年 = 'daorec3!年'
のようにすると、データ型が異なるとのエラーがでます。
CreateFieldのところで、データ型をdbLongとか、dbDoubleにしても同じです。
仕方なく、年度別係数の年のデータ型をテキスト型にし、CreateFieldのところでもdbTextにするとうまくいきます。
うまく、数値型のままでSQLを成功させる方法はないでしょうか？
よろしくお願いいたします。

> SELECT 卸売物価 FROM 年度別係数 WHERE 年 = 'daorec3!年'
> のようにすると、データ型が異なるとのエラーがでます。
> CreateFieldのところで、データ型をdbLongとか、dbDoubleにしても同じです。
>
年は 文字列('daorec3!年') と比較されているからね。

dim strSQL as string
strSQL = "SELECT 卸売物価 FROM 年度別係数 WHERE 年 = '" & daorec3!年 & "'"
set ??? = ???.OpenRecordset(strSQL, ???)
みたいになるのかな。

早速のご返答ありがとうございます。

すみません。簡略化したプログラムで説明が不十分だったのですが、教えていただいた下記のようにはプログラムをくんでいるのです。

> dim strSQL as string
> strSQL = "SELECT 卸売物価 FROM 年度別係数 WHERE 年 = '" & daorec3!年 & "'"
> set ??? = ???.OpenRecordset(strSQL, ???)

それでもデータ型が違うとエラーが出てしまうので、どうしてなのかな？と思っていたのですが…

何か別の原因があるのでしょうか。。ご返答お願いいたします。

SQL文の中でシングルクォーテーションで挟んだら文字列データと
いう意味になります。

ご返答ありがとうございました。

> SQL文の中でシングルクォーテーションで挟んだら文字列データと
> いう意味になります。

なるほど、そういうことだったんですね。
うまくいきました！ありがとうございました！