Visual Basic - Erro al comparar TXT con columna

Buenas verán, estoy haciendo un programa que lleva una primary key "Socios" para que no se pueda repetir, la única manera que se me ha ocurrido de comprobar antes de guardar si ya existe o no, y así evitar el error es leer toda la columna socio y comparar los valores con el Nº que le tengo puesto en el Textbox.

El problema es que si el socio es el Nº 9 y en la base de datos hay del 1 al 8, me dice que el 9 esta y la comprobación la hago antes de guardar.

esto es lo que hago:

For Each fila In midatatable.Rows
Dim Id As String = fila("Socio").ToString

If Id = txtnumsocio.Text Then
MessageBox.Show("El socio ya existe")
Exit Sub

End If
Next

todas las comparaciones van bien pero si son 8 socios el ID no se por que me dice luego que tiene el numero 9 y al coincidir con el textbox me dice que ya existe.

Agradecería cualquier ayuda, pro que me trae de cabeza

No evites el error, captúralo con on error goto.

Falta que pongas que base de datos usas y el codigo donde cargas los datos y donde defines los objetos de datos...

Como sea...
La mejor manera de comprobar si existe un socio o no es ejecutando un sql query sobre los datos, un simple SELECT...FROM...WHERE...

Estudia un poco de ADO.Net

Probare lo que me decís, yo conecto mediante Acces pues al ser un programa sencillo no me e puesto a meterme en SQL.

la conexion la hago mediante una librería que tengo echa así que los valores por así decirlos importantes serian:


dentro de Fichas esta la columna Socio que es una Primary key . y hay es donde uso el for


No obstante probare lo que me habeis comentado, muchas gracias ya os comento.