Necesito validar usuarios y contraseñas en vb 6.0

Tengo una base de dato en sql he desarrollado un formulario de usuario y password en visual 6.0 y necesito poder ingresar todos los usuarios ya creados que están en esa base.
Tengo esto en el formulario de password y usuario
Option Explicit
Private Sub cmdCancel_Click()
End
End Sub
Private Sub cmdLogIn_Click()
If (txtUser.Text = "hola" And txtPassword.Text = "mundo") Then
frmPrincipal.Show
Unload Me
Else
MsgBox "Usuario incorrecto", vbYes + vbInformation, "Contraseña"
End If
End Sub
Private Sub Form_Load()
End Sub
Private Sub Label1_Click()
End Sub
La tabla esta en un db sql llamada logins