Cita:
Iniciado por eter_6 
Intenta cambiando tu Query, hazlo de esta manera:
"select count(*) from socios_catalogo where nombre ='" & nombre & "' and paterno ='" & paterno & "' and materno='" & materno & "'"
Muchas gracias por tu respuesta, al fin logre realizar mi cometido, asi quedo:
Dim datos As New DataTable
Dim sql_tot As String = "select count(*) as numero from socios_datos"
Dim Adapter As New MySqlDataAdapter
comando_dat.CommandText = sql_tot
Adapter.SelectCommand = comando_dat
Adapter.Fill(datos)
num = CInt(datos.Rows(0).Item(0))
Gracias mil por su ayuda