Excel VBA InStr函数

Question

为什么我的InStr函数在显然是HTML字符串的一部分时返回0？

我不能在没有更多文本的情况下发布此内容。我无法在没有更多文本的情况下发布此内容。我无法在没有更多文本的情况下发布此内容。我无法在没有更多文本的情况下发布此内容。我无法在没有更多文本的情况下发布此内容。

<script src="https://ajax.googleapis.com/ajax/libs/jquery/1.10.0/jquery.min.js"></script>
<div></div>

Answer 1

试试这个：

    FO = InStr(1, FullHTML, BPlan, vbTextCompare) + Len(BPlan)

Answer 2

FO和LO定义为string。 它应该是integer，因为Instr返回integer。 纠正错误。

Public Shared Function InStr(_
   ByVal String1 As String, _
   ByVal String2 As String, _
   Optional ByVal Compare As CompareMethod _
) As Integer