Si lo que necesitas es un solo resultado, un solo campo no es necesario un adaptador de datos mejor usa un "MySqlCommand" con executescalar
Código Visual Basic:
Ver originalPublic Function Seleccion_de_datos(ByRef SQL As String) As String' no se que tipo
'de datos es el resultado
'Llamamos al procedimiento Conectar() para conectarnos a la BBDD MySQL
Conectar()
'Declaramos las cariables que nos van a hacer falta
Dim Adaptador As New MySqlCommand(SQL, Conexion)
Dim Rsdatos As String'No se que tipo de datos es
'Adaptador va ejecutar la consulta y con ExecuteScalar te regresara el dato de la 'primera columna en la primera fila
Try
Rsdatos=Adaptador.ExecuteScalar()
catch ex As Exception
End Try
'Devolvemos los datos que saquemos
Return Rsdatos
'Cerramos la conexion a la BBDD MySQL
Conexion.Close()
End Function
Y listo, una cosita mas es que
xxxxxxxxxxxx Aqui es donde tengo que meter el dato que necesito en una variablexxxxxxxxxxxxxxxxxxxxxxx
Se que debe ser algo como esto: VARIABLE_QUE_SEA= Seleccion_de_datos(Consulta)
'Cerramos la conexion a la BBDD MySQL
Conexion.Close()
Ahi no tienes que volver a cerrar la conexion porque de hecho la conexion no existe en esta llamada la conexion ya la cerraste en la funcion Seleccion_de_datos, espero haberte ayudado.