Hola toño:
Tenés algo hecho ?
Si es así mandame un mail por este medio, que te envío al mismo el mio.
Luego me envías la base que tenes y tu pequeño sistema y con gusto veremos como podemos ayudarte.

Un abrazo.

Luis

Te cuento a ver si te sirve:
Nosotros creamos un proyecto nuevo, con una base de datos en SqlServer y visual Basic 2008.
La tabla la llamamos -Alumnos- y le creamos dos columnas o campos
1°) Apellido
2°) Sexo

Cargamos en la base cinco registros dos "Masculinos" y tres "Femeninos"

Luego generamos una consulta parametrizada con la siguiente directiva.
---------------------
SELECT Apellido, Sexo
FROM Alumnos
WHERE (Sexo = 'Femenino')
---------------------
El nombre de esta consulta se puso por defecto "FillBy1"
Pero le podes poner el nombre que vos quieras.
---------------------
Finalmente en un boton con el captión "Select" del formulario pusimos el siguiente código para llamar a dicha consulta:
---------------------

Try
Me.AlumnosTableAdapter.FillBy1(Me._MyDatabase_1DataSet1.Alumnos)
Catch ex As System.Exception
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
Me.Text = Me.AlumnosBindingSource.Count
-------------------

Ahora te dejo el código del botón select con las explicaciones

-------------------
'creamos una variable de numero para contener los datos totales de la base de datos y tabla puntual.
Dim total As Integer
'asignamos a la variable el valor total inicial de la tabla
total = Me.AlumnosBindingSource.Count
'Con Try que es una de las maneras que tenes de controlar errores y excepciones
'cargamos la consulta previamente creada(FillBy1)
Try
Me.AlumnosTableAdapter.FillBy1(Me._MyDatabase_1DataSet1.Alumnos)
Catch ex As System.Exception 'si acontece el error o la excepción
System.Windows.Forms.MessageBox.Show(ex.Message)
End Try
'Finalmente mostramos el resultado por pantalla en el captión o propiedad text del formulario
'en la parte de arriba -vos la pones donde vos quieras.
Me.Text = "Total de Alumnos: " & total & " - Fem. " & Me.AlumnosBindingSource.Count & " - Masc. " & total - Me.AlumnosBindingSource.Count


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: esta línea de código carga datos en la tabla '_MyDatabase_1DataSet1.Alumnos'
‘Fill es una consulta de carácter global es decir te carga toda la base de datos
Me.AlumnosTableAdapter.Fill(Me._MyDatabase_1DataSet1.Alumnos)
End Sub

'Aquí dos botones para adelantar y retroceder de a un registro.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'esta función es para adelantar un registro
Me.AlumnosBindingSource.MoveNext()
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
'esta función es para retroceder un registro
Me.AlumnosBindingSource.MovePrevious()
End Sub

---------------------------------


Finalmente si tenes algún mail te envio el proyecto o alguna imagen del petit programa, donde podras ver en la parte superior del formulario, el resultado de ejecutar la función del botón select
Mientras que en los textbox en esta instancia, solo podrás navegar en los tres registros filtrados femeninos.

---------------------------------

Entonces si utilizaras la función SQL "Select" para buscar en la tabla de personas autorizadas, sea el nombre de usuario como su correspondiente clave de autorización, con algunos comandos como "LIKE" o "=", y si coinciden los datos habilitar el ingreso de datos en el formulario.
--------------------------------
Hay algunas diferencias mínimas que si investigas las encontrarás entre el Visual 2005 y el 2008.
--------------------------------
A partir de aquí me parece que se te facilita un monton todo.

--------------------------------
Seguidamente te enumero algunas de las formas de la sintaxis SQL que podes utilizar, estudialas, porque podrías utilizar menos código con el comando “COUNT” y “WHERE”
Select
SELECT "nom de colonne" FROM "nombre_tabla"
Distinct
SELECT DISTINCT "nombre_columna"
FROM "nombre_tabla"
Where
SELECT "nombre_columna"
FROM "nombre_tabla"
WHERE "condition"
And/Or
SELECT "nombre_columna"
FROM "nombre_tabla"
WHERE "condición simple"
{[AND|OR] "condición simple"}+
In
SELECT "nombre_columna"
FROM "nombre_tabla"
WHERE "nombre_columna" IN ('valor1', 'valor2', ...)
Between
SELECT "nombre_columna"
FROM "nombre_tabla"
WHERE "nombre_columna" BETWEEN 'valor1' AND 'valor2'
Like
SELECT "nombre_columna"
FROM "nombre_tabla"
WHERE "nombre_columna" LIKE {patrón}
Order By
SELECT "nombre_columna"
FROM "nombre_tabla"
[WHERE "condición"]
ORDER BY "nombre_columna" [ASC, DESC]
Count
SELECT COUNT("nombre_columna")
FROM "nombre_tabla"
Group By
SELECT "nombre_columna 1", SUM("nombre_columna 2")
FROM "nombre_tabla"
GROUP BY "nombre_columna 1"
Having
SELECT "nombre_columna 1", SUM("nombre_columna 2")
FROM "nombre_tabla"
GROUP BY "nombre_columna 1"
HAVING (condición de función aritmética)
Create Table
CREATE TABLE "nombre_tabla"
("columna 1" "tipo_de_datos_para_columna_1",
"columna 2" "tipo_de_datos_para_columna_2",
... )
Drop Table
DROP TABLE "nombre_tabla"
Truncate Table
TRUNCATE TABLE "nombre_tabla"
Insert Into
INSERT INTO "nombre_tabla" ("colonne 1", "colonne 2", ...)
valorS ("valor 1", "valor 2", ...)
Update
UPDATE "nombre_tabla"
SET "colonne 1" = [nuevo valor]
WHERE {condition}
Delete From
DELETE FROM "nombre_tabla"
WHERE {condición}
--------------------------------------
Un fuerte abrazo y esperamos que te sirva

Luis

info@bragadomas.com.ar
www.bragadomas.com.ar
www.bragadomas.com