VBAでLikeの使い方

質問

はじめまして。
アクセスでVBAをつかってデータ検索処理を書いていますが
rs.Find "[フリガナ] Like *" & Me![Kana] & "*"を
rs.Find "[フリガナ] Like" & Me![Kana] & "*"と書くと
上手く動きません。テキストボックスKanaにある文字を
任意の位置ではなく先頭からの検索条件にしたいのですが
どのように書けばよいでしょうか？
よろしくお願い致します。

回答No.1

PAPA0427 · ベストアンサー

＞rs.Find "[フリガナ] Like *" & Me![Kana] & "*"を
＞rs.Find "[フリガナ] Like " & Me![Kana] & "*"と書くと
条件文の生成ミスです。

rs.Find "[フリガナ] Like "*" & Me![Kana] & "*"
rs.Find "[フリガナ] Like Me![Kana] & "*"
と言う風に書いてください。

１．前方一致は　Like "ABC*"
２．部分一致は Like "*ABC*"
３．後方一致は Like "*ABC"
となります。ＡＢＣの部分がMe![Kana]というオブジェクトなら、
１．Like Me![Kana] & "*"
２．Like "*" & Me![Kana] & "*"
３．Like "*" & Me![Kana]
となります。

お礼

早速のお返事ありがとうございます。
教えた戴いたように早速やってみたいと思います。
本当に有難うございました。