1

私はこれまで何度もstackoverflowの善良な人々に助けられてきたので、ここに私の問題があります...

私はGOODのコーディングをしていませんが、クラスではVisualBasicを開始します。Visual Basicはそれほど難しいものではありませんが、私はそれに精通しておらず、これを行うための適切な方法を考えることができません。

演習として、私は非常に単純なWebブラウザーをコーディングしています。これが私の問題です...

    Private Sub Send_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Send.Click
    Dim input As String = TextBox1.Text
    Me.WebBrowser1.Navigate(New Uri(input))

ユーザーがアドレスバーに「www.youtube.com」と入力すると、例外がスローされます（最初にhttp：//がないためだと思います）。ただし、単純に「http：//」を追加することはできません。文字列の先頭。ダブルアップの可能性があるためです。

「http：//」の文字列を確認し、それに応じて追加するにはどうすればよいですか？

4

2 に答える 2

2

正規表現を使用して、URL/URIを検証できます。

 Dim pattern = "http(s)?://([\w-]+\.)+[\w-]+(/[\w- ./?%&=]*)?"
 Dim Inputurl = "http://www.abc.com/aa"

  If Regex.IsMatch(Inputurl, pattern) Then
     '            
  Else
     '      
  End If

または、String.StartsWith（）メソッドを使用して、

 If Inputurl.StartsWith("http://") Then
       '
 End If
于 2012-08-24T02:46:46.660 に答える
0

あなたはこのようなことをする必要があります：

Dim value As String = Mid(input, 1, 7)

if value = "http://" then
    'you don't need to modifie the url
   else
   'you add your http:// string normaly
EndIf

これがあなたのPSに役立つことを願っています：すみません私はメイドのいくつかの間違いを修正しました

于 2012-08-24T02:50:59.140 に答える