作者:VB.NET开发
项目:System.ServiceModel.Securit
Dim creds As New ClientCredentials()
' Configure chain trust.
creds.ServiceCertificate.Authentication.CertificateValidationMode = X509CertificateValidationMode.ChainTrust
creds.ServiceCertificate.Authentication.TrustedStoreLocation = StoreLocation.LocalMachine