As Harry Johnston commented, you can use the following to authenticate a username/password:
Private Declare Auto Function CloseHandle Lib "kernel32.dll"
(ByVal clsTokenToClose As IntPtr) As Integer
Private Declare Auto Function LogonUser Lib "advapi32.dll" ( _
ByVal lpszUsername As String, _
ByVal lpszDomain As String, _
ByVal lpszPassword As String, _
ByVal dwLogonType As Integer, _
ByVal dwLogonProvider As Integer, _
ByRef phToken As IntPtr) As Boolean
Const DOMAIN_NAME As String = "MYDOMAIN"
Dim token As IntPtr
'Use the Win32API LogonUser to authenticate UserName and Password.
'If successful, a token representing the user is returned.
If LogonUser("UserName", DOMAIN_NAME, "password", LOGON32_LOGON_BATCH,
LOGON32_PROVIDER_DEFAULT, token) Then
'The token is used to create a WindowsIdentity, which is in turn
'used to create a WindowsPrincipal. The WindowsPrincipal is checked
'to see if it belongs to the desired group in ActiveDirectory.
Dim WIdent As New WindowsIdentity(token)
Dim WPrincipal As New WindowsPrincipal(WIdent)
If WPrincipal.IsInRole("Administrators") Then
'User has admin privilege, carry on.
End If
CloseHandle(token)
End If
Be sure to replace "Administrators" in the WPrincipal.IsInRole call with the group you want to check against.