Code
MyString = (New System.Text.ASCIIEncoding).GetBytes("This is a String.")


Wrapped in a function:

Code
    Public Function Str_AsByteArr(ByVal MyString As String) As Byte()
        Return (New System.Text.ASCIIEncoding).GetBytes(MyString)
    End Function

The Captian
Today they call you "crazy". Tomorrow they call you "ahead of your time."
Global Skywatch Learn about Chemtrails - You're breathing them now!
OnlyTheBestHerbs.com World-class supplements
Mercury Talk Why you are sick.
OneUp Domains Domains, Hosting, Email
1-800-358-4278 (U.S. & Canada)