在Visual Basic 6.0程序中,我要确保不包含引号的字符串sTemp。我有一行:

If sTemp.Contains("""") Then

但是,当我在sTemp之后键入句点时,我没有从智能感知中得到任何东西,并且当我尝试编译时,出现以下错误:

编译错误:
无效的限定词

最佳答案

VB6字符串不是对象,因此在字符串变量上没有可以调用的方法。

要测试字符串是否包含引号,您需要使用InStr函数,即

if InStr(sTemp, """") > 0 then ' string contains at least one double quote

希望这可以帮助

更新这与原始问题无关

威廉,我只是想到了这一点,您可能会发现有用的无关信息。

用VB6有很多方法可以使自己步履蹒跚。
其中不那么明显的事实是
Dim myCollection as new Collection

将具有side effects you could never imagine

切勿将新东西当作DIM进行暗淡处理

将变量变暗,然后在第二行将其分配给新对象。希望这可以帮助。
Dim myCollection as Collection
Set myCollection = New Collection

关于string - Visual Basic 6.0中的无效限定符错误,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/6204917/

10-11 20:19