导航并在同一文本框中搜索

时间:2016-02-23 21:11:45

标签: vb.net

网络浏览器和我有点麻烦。我想让用户在同一个文本框中写入url或搜索查询,就像它的ie。在谷歌铬。我有一个想法,但我也对其他人开放

基本上我的解决方案是检查文本是否有域名,我的意思是它有"。"和3或2个任何字母。

2 个答案:

答案 0 :(得分:0)

您可以使用正则表达式来检查输入的字符串是否为网址(see this question)。

see here获取有关VB.Net中正则表达式的教程

如果不是网址,请进行典型搜索:)

答案 1 :(得分:0)

好吧,我尝试使用一些正则表达式,但有一件事。 我用这个正则表达式:

&#34; ^ HTTP:// [A-ZA-Z0-9-] + [A-ZA-Z] {2,3}(/ \ S *)$&#34; < / p>

并且有我的代码

Dim r As Regex = New Regex("^http\://[a-zA-Z0-9\-\.]+\.[a-zA-Z]{2,3}(/\S*)?$")
    Dim match As Match = r.Match(TextBox1.Text.ToString, RegexOptions.IgnoreCase)
    If GetAsyncKeyState(13) Then
        If match.Success Then
            navigate(TextBox1.Text, WebControl1)
        Else
            navigate("http://www.google.com/search?q=" + TextBox1.Text, WebControl1)
        End If
    End If

但问题是,无论我把什么放到textbox1,它实际上都会像在else语句中一样搜索它