VB and XML Encoding (UTF-8)?

Guys...I really need your help..

I have this vb code where i will send a value typed in a textbox to MSMQ...

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim mq As MessageQueue
    'Dim format As XmlMessageFormatter
    Dim msg As Message
    'Dim dec As XmlDeclaration

    Try
        msg = New Message
        msg.Priority = MessagePriority.Normal

        If Not (MessageQueue.Exists(".\Private$\toNavision")) Then
            mq = MessageQueue.Create(".\Private$\toNavision")

        Else
            mq = New MessageQueue(".\Private$\toNavision")

        End If
        msg.Label = "Navision MSMQ-BA"
        msg.Body = TextBox1.Text

        mq.Send(msg)
        Label1.Text = "Message sent."

    Catch ex As MessageQueueException
        Label1.Text = ("MSMQ Error: " + ex.ToString())

    Catch开发者_运维知识库 ex As Exception
        Label2.Text = ("Error: " + ex.ToString())

    Finally
        mq.Close()

    End Try

End Sub

And the result is successful...where by I can see the message in the queue...but i'm not sure of the XML encoding...and i need to send the message in UTF-8, furthermore i can't figure out how to send those message to be UTF-8 into the Queue...

Please help..

---

The Encoding can be altered with the use of the encoding-class.

Dim value As Encoding

value = Encoding.UTF8

More about using that with UFT8 can be read here in the MSDN.