I remember this because of the need to find out when the user set his password, but I never used it. Hope this helps ... and I have never tried the UserAccountControl attribute, but it does not look too crazy.
Pwd-Last-Set Attribute
0, User-Account-Control UF_DONT_EXPIRE_PASSWD, .
, - , ( ). , 'to-be-return', .
, 3.5. waaaaay . DirectorySearcher, UserAccountControl, . , , dunno...
Imports System.DirectoryServices.AccountManagement
Dim pctx = New PrincipalContext(AccountManagement.ContextType.Domain)
Dim p = UserPrincipal.FindByIdentity(pctx, "andrew")
If p.LastPasswordSet.HasValue = False Then
If p.PasswordNeverExpires = False Then
Console.WriteLine("You should have to enter a password next time!")
End If
End If