List Encryption Algorithms Provided by CSP

VB.NET example program to List Encryption Algorithms Provided by the Microsoft Enhanced Crypographic Service Provider

        Dim csp As New Chilkat.Csp()

        ' Select the Microsoft Enhanced Cryptographic Service Provider
        csp.SetProviderMicrosoftEnhanced()

        ' List the encryption algorithms provided by the Enhanced Microsoft CSP.
        ' A sample output looks like this:
        'Encryption Algorithms:
        '0: RC2(128 bits)
        '1: RC4(128 bits)
        '2: DES(56 bits)
        '3: 3DES TWO KEY(112 bits)
        '4: 3DES(168 bits)

        Dim report As String
        report = "Encryption Algorithms: " & vbCrLf
        Dim i As Integer
        For i = 0 To csp.NumEncryptAlgorithms - 1
            report = report & Str(i) & ": " & csp.GetEncryptionAlgorithm(i) & _
                "(" & csp.GetEncryptionNumBits(i) & " bits)" & vbCrLf
        Next
        MsgBox(report)

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