VB.Net by API System Security Principal 3 codes