Public Overloads Sub WriteToStore( _
   ByVal name As String _
) 

public void WriteToStore( 
   string name
)

string keyname = this.GetType().FullName + ".TestKeyCreateAndDelete";
using (RSAPrivateKey key = new RSAPrivateKey())
{
    Assert.IsFalse(key.DeleteFromStore());

    key.WriteToStore(keyname);

    CspParameters cp = new CspParameters();
    cp.KeyContainerName = keyname;
    cp.Flags = CspProviderFlags.UseExistingKey;

    using (RSAPrivateKey key2 = RSAPrivateKey.FromStore(cp))
        Assert.AreEqual(key.ToXml(), key2.ToXml());

    using (RSAPrivateKey key2 = RSAPrivateKey.FromStore(keyname))
    {
        Assert.AreEqual(key.ToXml(), key2.ToXml());
        Assert.IsTrue(key2.DeleteFromStore());
        key2.Dispose();
    }
}

Dim keyname As String = Me.[GetType]().FullName + ".TestKeyCreateAndDelete"
Using key As New RSAPrivateKey()
    Assert.IsFalse(key.DeleteFromStore())

    key.WriteToStore(keyname)

    Dim cp As New CspParameters()
    cp.KeyContainerName = keyname
    cp.Flags = CspProviderFlags.UseExistingKey

    Using key2 As RSAPrivateKey = RSAPrivateKey.FromStore(cp)
        Assert.AreEqual(key.ToXml(), key2.ToXml())
    End Using

    Using key2 As RSAPrivateKey = RSAPrivateKey.FromStore(keyname)
        Assert.AreEqual(key.ToXml(), key2.ToXml())
        Assert.IsTrue(key2.DeleteFromStore())
        key2.Dispose()
    End Using
End Using