ACCESS VB で Ｌｉｋｅ使った時の書き方

質問

If a = b Then
で、b、はスペースを含む可能性があるので
Like、を使いたいのですが
If a Like "*" & b & "*" Then
こんな風になるのでしょうか
上の書き方は間違いと思いますが
どう書けばいいのか、教えてください
よろしくおねがいします
ACCESSのモジュールのところに書くVBです

回答No.1

venzou · ベストアンサー

>で、b、はスペースを含む可能性があるので
>If a Like "*" & b & "*" Then

bにスペースを含む可能性があるなら、逆ですね。

If b Like "*" & a & "*" Then

*は何でもありなので、bにaが含まれていればOKという条件なります。

スペースに限定するなら、Trimの方が良いでしょう。

If Trim(b) = Trim(a) Then

もっと細かい制御をしたいなら、RegExpを使う方法もあります。参考にどうぞ。
http://www.7key.jp/program/accapi/regexp.html
http://officetanaka.net/excel/vba/tips/tips38.htm

お礼

ありがとうございました
助りました

回答No.2

Dxak

> で、b、はスペースを含む可能性があるので
> Like、を使いたいのですが
> If a Like "*" & b & "*" Then
bの中に a があるか確認したいと言う話なら・・・
If b Like "*" & a & "*" Then
では、ないの？
ぱっと見、あってると思ったんだけど文章読むと逆のような＾＾；

お礼

ありがとうございました
ピン、ときて
クリアーになりました