文字コード変換（UTF8→SJIS）

文字コードが異なるページ間での、データのやりとり時

Dim utf As Encoding = Encoding.UTF8
Dim sjis As Encoding = Encoding.GetEncoding(932)
Dim strData As String = "あいう"
Dim uBytes = Encoding.UTF8.GetBytes(strData)
Dim sBytes = Encoding.Convert(utf, sjis, uBytes)
txt01.text = sjis.GetString(sBytes)

ASP.NETはUTF8なので、他のCGIに渡すのには必要になることも。
ネットで誰かが上げてたコードを利用、どこのページだか忘れてしまった。スイマセン・・・