創建一個地址欄，該地址欄可以像谷歌瀏覽器一樣用作Google搜索欄。 VB

Question

我想在Visual Studio 2013中使用Windows窗體創建一個瀏覽器，並且瀏覽器需要有一個地址欄，可以像谷歌搜索欄一樣在Chrome中加倍。這裏是我的地址欄的代碼，但我不知道在「If」之後和「Then」之前放置什麼以完成此操作。有任何想法嗎？

Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged 
     If    Then 
      AxWebBrowser1.Navigate(TextBox1.Text) 
     Else 
      AxWebBrowser1.Navigate("http://www.google.com/search?q=" + TextBox1.Text) 
     End If 
    End Sub 

Answer 1

您可以使用System.Uri.TryCreate來檢查;不過，我會使用UriKind.Absolute，因爲很多東西都是有效的相對URI。

Dim uri As Uri 

If System.Uri.TryCreate(TextBox1.Text, UriKind.Absolute, uri) Then 
    ' Navigate to it 
Else 
    ' Treat it as a search 
End If 

你也可以將它通過要求（或允許）免費猜測體驗前綴像?，這是很容易與s.StartsWith("?")檢查，並與s.Substring(1)去除。

我剛剛注意到Ax前綴;如果你正在使用的ActiveX控件，

• 您可以使用System.Uri.IsWellFormedUriString用相同的前兩個參數只是做了檢查，而不是還創建URI

• 不要