如何利用 ADSI 取得 NT User 屬於的 Group?(編號：3850)

以下程式可取得 User1 的全名,但不知如何可取他得上人所屬的Group?
Set myObj = GetObject("WinNT://mymachine/user1,user")
Debug.Print myObj.FullName