Returns the ASCII value of the licence type.
Public Declare Function PKI_LicenceType Lib "diCrPKI.dll"
(ByVal nReserved As Long) As Long
nRet = PKI_LicenceType(nReserved)
Long not used in this release. Specify zero.
long _stdcall PKI_LicenceType(long reserved);
Long: Returns the ASCII value of the licence type, either "D" (68, 0x44) for the Developer Version
or "T" (84, 0x54) for the Trial Version.
Note the Australian/English spelling of `Licence'.
Dim nRet As Long
nRet = PKI_LicenceType(0)
Debug.Print "PKI_LicenceType is " & Chr(nRet)
PKI_LicenceType is D