fc2ブログ

2008-09-27

AccessVBA SQL文発行時点でStringで定義して"(ダブルクォーテーション)で囲みたい

いくらがんばっても、どうしても、

="1980") AND

という部分がAccessのVBEではうまくいかず、やっとできたのが

1980をStringで定義した変数に代入する、たとえば、

Dim yrs As String

yrs = "1980"

更に、文字列の変数を宣言して

Dim stYrs As String

stYrs = """" & yrs & """"

="1980") ANDの、"1980"の部分を入れ替えて

=" & stYrs & "(

とすると、DAOで、たとえばstSQLとか、適当に文字列で宣言した変数に代入して

db.Execute stSQL

すると、実行される。SELECT ************ INTO なら、新たなテーブルが作成されるし、SELECTの代わりにINSTERだて、追加される。

他にも、たとえば

分類)="00"));

という部分が欲しいけど、そのまま書いてもVBEははねてしまうので、

分類)=""00""));

と表記すると、同じ内容となってSQL文を発行可能となる。

スポンサーサイト



theme : プログラミング
genre : コンピュータ