The ISecurityIdentifier interface for the Domain object gets the Security Identifier (SID) of the Primary Domain Controller (PDC) of the domain.
Example
Dim Sid As ISecurityIdentifier
'Get the interface for domain object
Set Sid = GetObject ("NTDS://MSFT")
See Also