字符串比较

Question

Dim strNotCorrectChar As String
Dim intPos As Integer
dim  strToCheck As String
strToCheck  = "\"
strNotCorrectChar = "\/:;*?""<>|" 
intPos = InStr(1, p_strToCheck, strNotCorrectChar, vbTextCompare)
为什么每次的到的intPos 的值都是0呢

Answer 1

intPos = InStr(1, strNotCorrectChar,strToCheck)
这样才对。
从第1位开始查找参数2中含有参数3的起始位置。

Answer 2

strNotCorrectChar不包含在p_strToCheck中

Answer 3

如果strToCheck  = "\！%%" 是多个字符的话
intPos = InStr(1, strNotCorrectChar,strToCheck)
中 intPos返回的值还是0 ，怎样才能实现strToCheck  中任何一个字符串包含在strNotCorrectChar中 intPos的返回值就进行改变呢

Answer 4

Dim strNotCorrectChar As String
Dim intPos As Integer
Dim strToCheck As String
strToCheck = "！\%%"
strNotCorrectChar = "/:;*?""<>|\"
For i = 1 To Len(strToCheck)
intPos = InStr(1, strNotCorrectChar, Mid(strToCheck, i, 1))
If intPos <> 0 Then
Exit For
End If
Next