Realizar consulta en MySQL

[Luisef08]

Saludos, algo está erroneo con mi código, un par de personas me está intentando apoyar, lo cuál agradezco som¡bremanera, pero la verdad es que ando muy perdido. a continuación dejo mi código para ver si alguien me puede hechar la mano.



Imports MySql.Data.MySqlClient
Public Class Form1

Public conexion = New MySqlConnection()
Public alumno As String
Public alumnos As String
Public x As Integer = 0

Private Sub ButtonGuardar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonGuardar.Click

Dim nombre As String
limpiar()
conexion.ConnectionString = "server=localhost;" & "user id=root;" & "password=Luisef;" & "database=UTM"
conexion.Open()

x = txtmatricula.Text

nombre = "nombre"
txtnombre.Text = consulta(nombre)
nombre = "apellidos"
txtapellidos.Text = consulta(nombre)
nombre = "fecha_nac"
txtfecha.Text = consulta(nombre)
nombre = "direccion"
txtdireccion.Text = consulta(nombre)
nombre = "telefono"
txttelefono.Text = consulta(nombre)
nombre = "grupo"
txtgrupo.Text = consulta(nombre)

conexion.close()
End Sub
Public Function consulta(ByVal nombre As String)
Dim comandos = New MySqlCommand()
Dim lect As MySqlDataReader
Dim query As String

comandos = New MySqlCommand()

query = "select " + nombre + " from alumnos where id_alumnos=" + x + ";"

comandos.CommandText = query

comandos.CommandType = CommandType.Text
comandos.Connection = conexion 'le digo cual es la variable de conexion
'comandos.ExecuteReader() ' le digo a la variable lectora que lo que tiene que recojer es la ejecucion de la variable comandos. A esta linea la deje solamente comentada por k está repetida abajo, pero no entineod que es lo que hace

lect = comandos.ExecuteReader()

Return lect
'retorno una variable del tipo MysqlDataReader

End Function
Public Sub limpiar()
txtnombre.Text = ""
txtapellidos.Text = ""
txtfecha.Text = ""
txtdireccion.Text = ""
txttelefono.Text = ""
txtgrupo.Text = ""
txtnombre.Focus()
End Class


no me deja compilar por que me da el siguiente error: Statment cannot appear within a method body. End of method assumed

Lo que quiero hacer es una consulta desde mi formulario en VB hacia mi base de datos en MySQL y mostrar los datos que se refieren a: Nombre, apellidos, direccion, telefono, grupo y todo en base al id, que en este caso es la matrícula.

Gracias por su ayuda. Saludos.