Vuelvo a postear, ya que queria editar pero respondieron antes :
Código vb:
Ver originalDim cnx as New MySqlConnection("MICADENADECONEXION")
Dim cmd As New MySqlCommand("Select mycampo from MITABLA where id = XXX", cnx)
Dim resultado As String
resultado = cmd.ExecuteScalar()