The ISecurityIdentifier interface for the User object gets the Security Identifier (SID) of the user account.
Example
Dim Sid As ISecurityIdentifier 'Get the interface for user object Set Sid = GetObject ("NTDS://MSFT\John")
See Also
User Object
ISecurityIdentifier Interface