(Visual Basic 6.0) Load an Ed25519 Private Key from Hex

Demonstrates how to load an Ed25519 private key from raw hex bytes.

Note: This example requires Chilkat v9.5.0.83 or greater.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim privKey As New PrivateKey

' We have the hexidecimal encoded bytes of the private key and public key:
Dim privKeyHex As String
privKeyHex = "d4ee72dbf913584ad5b6d8f1f769f8ad3afe7c28cbf1d4fbe097a88f44755842"
Dim pubKeyHex As String
pubKeyHex = "19bf44096984cdfe8541bac167dc3b96c85086aa30b6b6cb0c5c38ad703166e1"

' Load these values into the Chilkat private key object:
Dim success As Long
success = privKey.LoadEd25519(privKeyHex,pubKeyHex)
If (success = 0) Then
    Debug.Print privKey.LastErrorText
    Exit Sub
End If

' ---------------------------------------------------------------
' We don't actually need the public key.  If we pass an empty string for the public key,
' Chilkat will automatically compute it.
Dim privKey2 As New PrivateKey
success = privKey2.LoadEd25519(privKeyHex,"")

' Let's get the public key to see that it computed the same value.
Dim sbPubKeyHex As New ChilkatStringBuilder
privKeyHex = privKey2.GetRawHex(sbPubKeyHex)
Debug.Print "computed public key = " & sbPubKeyHex.GetAsString()

' The output should be:
' computed public key = 19bf44096984cdfe8541bac167dc3b96c85086aa30b6b6cb0c5c38ad703166e1