private static extern int NetUserAdd(
Private Declare Function NetUserAdd Lib "Netapi32.dll" ( _
Dim RetVal As Integer = NetUserAdd(Server, 1, NewUser, Out)
