mWebTitle是网页标题Private Sub webme_TitleChange(ByVal Text As String) 里
mWebTitle = nTitle
我 MsgBox mWebTitle  为"专利之家,设计发明与奇思妙想的乐园 ? 猜猜看"我
    MsgBox Len(mWebTitle) 为23 
    MsgBox InStr(FavTitle, "?") 既然是 0 说明没有?
另外测试Dim Str As String
Str = "专利之家,设计发明与奇思妙想的乐园 ? 猜猜看"    MsgBox Len(Str ) 为 23 
    MsgBox InStr(Str , "?") 为 19 
则是正常 的 这是为什么啊

解决方案 »

  1.   

    LZ你该配眼镜了.
    "?"在"mWebTitle"里,你去问"FavTitle"有用么?
      

  2.   

    FavTitle已经是mWebTitle赋值给他了
      

  3.   

    真奇怪了
    mWebTitle 就是webMe.Document.Title
    webMe.Document.Title 就是  专利之家,设计发明与奇思妙想的乐园 » 猜猜看msgbox (webMe.Document.Title) 就是  专利之家,设计发明与奇思妙想的乐园 ? 猜猜看但是 MsgBox InStr(webMe.Document.Title, "?") 就是 0
    另外测试 Dim Str As String 
    Str = "专利之家,设计发明与奇思妙想的乐园 ? 猜猜看"     MsgBox Len(Str ) 为 23 
        MsgBox InStr(Str , "?") 为 19 
    则是正常 的 这是为什么啊
      

  4.   

    Private Sub webme_TitleChange(ByVal Text As String) 里
    MsgBox InStr(StrConv(mWebTitle,vbNarrow), "?") 这样试试是否正常
      

  5.   

    webMe.Document.Title 里"?"为"»"的话,需要InStr(webMe.Document.Title, "»")了
      

  6.   

    Private Sub webme_TitleChange(ByVal Text As String) 里 
    MsgBox InStr(StrConv(mWebTitle,vbNarrow), "?") 这样试试是否正常这样可以了这是为什么呢? zhix88