Visual Basic.NET - Extraer un dato en una variable en VB .Net con MySQL y MySqlClient

[selcomad]

BUENAS TARDES...

Estoy llevando a cabo un pequeño proyecto con Visual Basic .Net el motor de bases de datos MySQL y el conector de Visual Basic .Net y MySQL.
De momento tengo realizada la conexion a la BBDD MySQL sin problemas. Lo "Bueno" viene ahora. Necesito meter un dato de un campo especifico de un registro en una variable. En PHP es facil, pero en lo que es VB .Net no tengo ni idea. ¿Alguien me puede echar una mano?
Este es el codigo que tengo hasta ahora:

MODULO:
----------------------------------------------------------------------------------------------------------------------------------------------------------
Module Biblioteca
'Creamos la conexion a la BBDD
Public Conexion As New MySqlConnection

'Creamos el procedimiento para llamar a la consulta
Public Sub Conectar()
Try
'Cerramos la conexion a la BBDD
Conexion.Close()

'Establecemos los parametros de la conexion a la BBDD
Conexion.ConnectionString = "server=XXXX; database=XXX; user=XXX; password=XXX;"

'Abrimos la conexion a la BBDD
Conexion.Open()

'Imprimimos un mensaje como que se ha conectado satisfactoriamente a la BBDD MySQL
MessageBox.Show("Conexion a la BBDD MySQL realizada")

Catch ex As Exception
'En caso de que no se conecte mandamos un mensaje con el error lanzado desde la BBDD MySQL
MsgBox(ex.Message)
End Try
End Sub

'Creamos un procedimiento que sea la funcion que seleccionará los datos de la BBDD (SELECT)
Public Function Seleccion_de_datos(ByRef SQL As String) As DataSet
'Llamamos al procedimiento Conectar() para conectarnos a la BBDD MySQL
Conectar()

'Declaramos las cariables que nos van a hacer falta
Dim Adaptador As New MySqlDataAdapter(SQL, Conexion)
Dim Rsdatos As New DataSet

'Adaptador va a rellenar la variable Rsdatos con "DATOS"
Adaptador.Fill(Rsdatos, "DATOS")

'Devolvemos los datos que saquemos
Return Rsdatos

'Cerramos la conexion a la BBDD MySQL
Conexion.Close()

End Function
End Module




FORMULARIO
-------------------------------------------------------------------------------------------------------------------------------------------------------
Public Class Form1

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

'Declaramos las variables que nos van a hacer falta
Dim Consulta As String = "CONSULTA QUE DEVUELVE UN SOLO RESULTADO CONSISTENTE EN EL VALOR DE UN CAMPO DE UN REGISTRO ESPECIFICO;"

'Realizamos una consulta a la BBDD MySQL declarando la variable que va a contener el dato extraido
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()



End Sub
End Class





Espero que me podais ayudar... Gracias...



GRACIAS...
UN SALUDO...

Isaac