MD2 Hash a String returning a Byte Array

Source code to MD2 hash a string, returning a byte array hash.

        ' This example uses the Chilkat .NET encryption library, which can be downloaded
        ' at http://www.chilkatsoft.com/downloads.asp

        ' Create an instance of the Chilkat encryption class.
        Dim crypt As New Chilkat.Crypt2()

        ' Any code begins the 30-day trial.
        crypt.UnlockComponent("30-day-trial")

        ' Set the hash algorithm to "MD2"
        crypt.HashAlgorithm = "MD2"

        ' Generate some data to hash...
        Dim str As String
        Dim i As Integer
        For i = 1 To 10
            str = str + "This is VB.NET example line " & i & vbCrLf
        Next
        TextBox1.Text = str

        ' MD2 hash the string, returning a byte array.
        Dim hashBytes() As Byte
        hashBytes = crypt.HashString(str)

Important: The download for this example does not contain the ChilkatDotNet.dll which
must be downloaded and installed separately at http://www.chilkatsoft.com/downloads.asp.
Once installed, add a reference to the DLL in the project by following the instructions at
http://www.example-code.com/vbdotnet/step2.asp