Getting the group name of user with VB 6

How can I get the name of the group of user in NT Domain he is logged onto?
I want to get it with Visaul Basic 6.0

Thanks