Determine if a Certificate has a Private Key

VB.NET example program to Determine if a Certificate has a Private Key

        ' Create a certificate store factory object
        Dim ccs As New Chilkat.CreateCS()

        ' Open the current user cert store
        Dim cstore As Chilkat.CertStore
        cstore = ccs.OpenCurrentUserStore()

        Dim numCerts As Integer
        numCerts = cstore.NumCertificates

        Dim i As Integer
        For i = 0 To numCerts - 1
            Dim cert As Chilkat.Cert
            cert = cstore.GetCertificate(i)

            ' Add the cert's DN to a listbox
            ListBox1.Items.Add(cert.SubjectDN)

            ' Check to see if the certificate has a private key
            If cert.HasPrivateKey() Then
                ListBox1.Items.Add("-- Has Private Key")
            End If
        Next

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