IEの操作:テキストボックスに入力された文字を検索につかうUTF-8形式に変換する

VB2008で文字をUTF-8形式に変換する実行例サンプルです。

IE(インターネットエクスプローラ)の操作へ



例えばYahooで「ブイビー実線入門」と検索すると、アドレス欄には
「http://search.yahoo.co.jp/search?p=%E3%83%96%E3%82%A4%E3%83%93%E3%83%BC%E5%AE%9F%E7%B7%9A%E5%85%A5%E9%96%80&ei=UTF-8&fr=top_ga1&x=wrt」
と表示されます。
この%が付いた文字列がUTF-8形式の文字になります。

■実行画面
変換する文字列欄のテキストボックスに入力し、「Button1」ボタンをクリックすると、変換後の文字列が下のテキストボックスに表示されます。
UTF-8変換フォーム

■実行コード

Imports System.Text

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim s As String

If TextBox1.Text = "" Then
MsgBox("変換する文字列を入力してください。")
Exit Sub
End If

'UTF-8として変換
Dim bytesData As Byte() = System.Text.Encoding.UTF8.GetBytes(TextBox1.Text)

s = ""
For Each b In bytesData
'%を付け、2桁の16進数に変換する
s = s & "%" & b.ToString("x2")
Next

TextBox2.Text = s

End Sub

End Class


Visual Basic 2008 Express Edition実践入門