Generate RSA Public/Private Key

Visual Basic example code showing how to generate an RSA public/private key.

Download 32-bit Chilkat RSA ActiveX (.msi)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

Dim rsa As New ChilkatRsa

Dim success As Long
success = rsa.UnlockComponent("Anything for 30-day trial")
If (success <> 1) Then
    MsgBox rsa.LastErrorText
    Exit Sub
End If

'  Generate a 1024-bit key.  Chilkat RSA supports
'  key sizes ranging from 512 bits to 4096 bits.
success = rsa.GenerateKey(1024)
If (success <> 1) Then
    MsgBox rsa.LastErrorText
    Exit Sub
End If

'  Keys are exported in XML format:
Dim publicKey As String
publicKey = rsa.ExportPublicKey()
Text1.Text = Text1.Text & publicKey & vbCrLf

Dim privateKey As String
privateKey = rsa.ExportPrivateKey()
Text1.Text = Text1.Text & privateKey & vbCrLf