请问,VB6中,要判断一个字符串中是否包含双引号怎么处理?
3个回答
展开全部
用like(字符匹配符)
格式
如果
"“”ABCDEFG"like"*“”*"
则返回值为真(true)
如果
"ABCDEFG"like"*“”*"
则返回值为假(false)
意思如果like前面字符中有like后面的字符,那么返回值为真(true)
否则为假(false)
格式
如果
"“”ABCDEFG"like"*“”*"
则返回值为真(true)
如果
"ABCDEFG"like"*“”*"
则返回值为假(false)
意思如果like前面字符中有like后面的字符,那么返回值为真(true)
否则为假(false)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
判断字符串s中是否包含双引号:
If instr(s, chr(34))>0 then
Msgbox "包含双引号"
End if
If instr(s, chr(34))>0 then
Msgbox "包含双引号"
End if
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
InStr函数
VBA.InStr
Function InStr([Start], [String1], [String2], [Compare As VbCompareMethod = vbBinaryCompare])
VBA.Strings 的成员
返回在另一字符串中第一次出现某一字符串的位置,找不到返回0
Function FindQuotes(strValue As String) As Boolean
FindQuotes = (InStr(strValue ,"""") > 0) '在VB中""""代表一个引号
End Function
VBA.InStr
Function InStr([Start], [String1], [String2], [Compare As VbCompareMethod = vbBinaryCompare])
VBA.Strings 的成员
返回在另一字符串中第一次出现某一字符串的位置,找不到返回0
Function FindQuotes(strValue As String) As Boolean
FindQuotes = (InStr(strValue ,"""") > 0) '在VB中""""代表一个引号
End Function
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询