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

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

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