like演算子について (ID:141499)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 > If "\" Like "[" & astrSql & "]" Then > astrSql = Replace(astrSql, "\", "¥") > End If これは、astrSql が『\』1 文字の時にしか True にならないので、 If astrSql = "\" Then astrSql = "¥" End If と同義になってしまいますが、それで良いのでしょうか? >【astrSql】の中身が『[(株)リ-a]』の場合、 つまり、 Dim astrSql As String = "[(株)リ-a]" If "\" Like "[" & astrSql & "]" Then astrSql = Replace(astrSql, "\", "¥") End If という事ですね。パターン文字列が『[[(株)リ-a]]』になっています。 > System.Exception - パターン文字列が有効ではありません。 もし、『[(株)リ-a]』という指定が、 『[』または『(』または『株』または『)』または『リ』または『-』または『a』または『]』 を意図しているのだとしたら、 If target Like "[[(株)リ-a]]" Then ではなく、 If (target Like "[[-(株)リa]") Or (target Like "]") Then などと処理する必要があるでしょう。 より複雑な検索が必要な場合には、正規表現(RegExp オブジェクト)による 検索を行うことも検討してみてください。