Public Shadows ReadOnly Default Property Item( _
   ByVal index As Integer _
) As Certificate

Dim instance As CertificateStore
Dim index As Integer
Dim value As Certificate
 
value = instance.Item(index)

public new Certificate this( 
   int index
) {get;}

public: __property new Certificate* get_Item( 
   int index
);

public:
new property Certificate^ default [int] {
   Certificate^ get(intindex);
}

Private Sub DisplayCertificateInfo(ByVal certNum as Integer)
   
   ' Create a new CertificateStore to access certificates
   Dim store as new CertificateStore(CertificateStoreLocation.LocalMachine, CertificateStore.My)

   Try
      ' Get the requested certificate
      Dim cert as Certificate = store(certNum)

      ' Display info about the certificate
      Dim msg as String
      msg+= "The following information about the certificate is available." + vbCrLF + vbCrLf
      msg+= "Name: " + cert.Name + vbCrLf 
      msg+= "Description: " + cert.Description + vbCrLf
      msg+= "Expires: " + cert.ExpirationDate + vbCrLf
      msg+= "Issued: " + cert.IssueDate + vbCrLf
      msg+= "Issues to: " + cert.IssuedTo + vbCrLf
      msg+= "Serial number: " + cert.SerialNumber + vbCrLf
      msg+= "Version: " + cert.Versio
      MessageBox.Show(msg)
   Catch ex as Exception
      MessageBox.Show("Error. No certificate found at index " + certNum)
   End Try
End Sub

private void DisplayCertificateInfo(int certNum)
{
   // Create a new CertificateStore to access certificates
   CertificateStore store = new CertificateStore(CertificateStoreLocation.LocalMachine, CertificateStore.My);

   try
   {
      // Get the requested certificate
      Certificate cert = store[certNum];

      // Display info about the certificate
      string msg = "";
      msg+= "The following information about the certificate is available.\r\n\r\n";
      msg+= "Name: " + cert.Name + "\r\n";
      msg+= "Description: " + cert.Description + "\r\n";
      msg+= "Expires: " + cert.ExpirationDate + "\r\n";
      msg+= "Issued: " + cert.IssueDate + "\r\n";
      msg+= "Issues to: " + cert.IssuedTo + "\r\n";
      msg+= "Serial number: " + cert.SerialNumber + "\r\n";
      msg+= "Version: " + cert.Version;
      MessageBox.Show(msg);
   }
   catch(Exception ex)
   {
      MessageBox.Show("Error. No certificate found at index " + certNum);
   }
}