Private Sub Form_Load()
    
    Dim SearchString, SearchChar, MyPos
    SearchString = "Microsoft Windows 2000"  
    SearchChar = "2000"   
    
    MyPos = InStr(SearchString, SearchChar) '这里用InStr(SearchString, SearchChar,1)比较不行,为什么啊??
    
    MsgBox MyPos
    
End Sub另外,如果SearchString 中找不到SearchChar那Instr返回什么值呢?谢谢啦

解决方案 »

  1.   

    你如果指定了以文本方式查找,则必须要指出起始查找的地方。
    如:InStr(1,SearchString, SearchChar,1)
      

  2.   

    我的代码是没错,你看到我注释的部分吗??如果写成这样就出问题了!Private Sub Form_Load()
        
        Dim SearchString, SearchChar, MyPos
        SearchString = "Microsoft Windows 2000"  
        SearchChar = "2000"   
        
        MyPos = InStr(SearchString, SearchChar,1)
        
        MsgBox MyPos
        
    End Sub
      

  3.   

    如果还有什么不清楚地,建议去看看msdn,呵呵
      

  4.   

    哦,谢谢各位,是我没看仔细。msdn上说:
    start 可选参数。如果指定了 compare 参数,则一定要有 start 参数。 呵呵,是我的疏忽不好意思