Помогите разобраться

[theal]

Хоть ссылку на тему дайте, где почитать можно. На гуглить ничего не удалось

[theal]

так будет правильно или нет

Код: Выделить всё

Private Sub Web_DocumentComplete(ByVal pDisp As Object, Url As Variant)
      'If InStr(Web.Document.href("http://googleads.g.doubleclick.net/pagead/ads"), vbTextCompare) Then-----эту меняем
      If InStr(Url, "http://googleads.g.doubleclick.net/pagead/ads") > 0 Then-на эту
        If Not GoogleAdd Then
          GoogleAdd = True
          Web.Navigate (Url)
        Else
          For Each testlink In Web.Document.links
       
          If InStr(1, testlink.href, "http://googleads.g.doubleclick.net/pagead/ads", vbTextCompare) Then
             testlink.Click
              Exit For
           
       
      End If
      Next testlink
      End If
      End If
    End Sub

[Qwertiy]

так будет правильно или нет
If InStr(Url, "http://googleads.g.doubleclick.net/pagead/ads") > 0 Then

70% что да. По-моему, стоит сравнивать с началом строки.
Так... А индексация в строках с 0 или 1?

PS: А ты умеешь нормально форматировать код?

[theal]

индикация с нуля
а что не правильно? (остальные 30%)

[Qwertiy]

индикация с нуля

Тогда почему больше нуля, если оно должно быть в самом начале?

[theal]

извини наверное ошибся...при = 0 и < 0 не работает
работает если вообще не прописывать > 0

[Qwertiy]

извини наверное ошибся...при = 0 и < 0 не работает
работает если вообще не прописывать > 0

Короче, должно работать либо при =0, либо при =1. Я уже забыл индексацию строк в VB6
Если ничего не указывать, то должно работать неверно, хотя, если повезёт, этот документ окажется первым и работать будет.

[theal]

Работает с > 0 и без него . Вот ещё вопрос...как сделать чтобы webbrowser не менял свои размеры. потому что иногда выскакивает реклама и растягивает его на пол проги

[Qwertiy]

Работает с > 0 и без него .

Должно работать с =1.

как сделать чтобы webbrowser не менял свои размеры. потому что иногда выскакивает реклама и растягивает его на пол проги

А ты там какой-нибудь AutoSize не поставил?

[theal]

нет не ставил