shuseed 发表于 2009-3-20 14:57:00

[求助] VBA的问题 ，恳请各位大侠帮忙啊

<p>Dim pBHandle() As String&nbsp;&nbsp;&nbsp; '所有被选中钻孔实体句柄数组</p><p>......................</p><p>For i = 0 To UBound(pBHandle)</p><p>&nbsp;If (StrComp(strBoreID, pBores(i).ID, vbTextCompare) = 0) Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; intTag = i<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; strBHandle = pBHandle(i)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Exit For<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; End If</p><p>为什么执行的时候总是说什么“下标越限”</p>
页: [1]
查看完整版本: [求助] VBA的问题 ，恳请各位大侠帮忙啊