错误的参数数目，或无效的属性assingment：“INSTR”线5

Question

嘿，我想搭袢下方，也可使其跳过管理共享如果共享与“_ Ø_”

开始我循环为：

'Compares The UnApproved Shares to the Current Shares 
    For Each objItem In colItems 
     Dim StrNonUnapprovedShares, Item 
     StrCurrentShares = objItem.name 
    if instr(AdminShares,lcase(objitem.name)) > 0 or mid(objitem.name,2,1) = "$" or left(lcase(objitem.name),10) = "pkgsvrhost" or instr("_o_") > 0 then 
     'Skipping known admin share 
    Else 
      For each Item in arrUnApprovedLines 
      If Lcase(Item) = Lcase(strCurrentShares) Then 
       StrNonUnapprovedShares = (StrNonUnapprovedShares & strCurrentShares & vbCrLf) 
      End If 

     Next 
    End If 
Next 

我插入一个“或INSTR（” _ ö_“）”之后，在第五行中的“pkgsvrhost”，但它差错，错误--type不匹配”“[串：“_ O _”] -

Answer 1

试试这个：

Or Instr(objitem.name, "_O_") > 0