Hola krlosh2 tienes que crear un objeto sqlDataReader, para leer la consulta. Mira a ver si te puedo ayudar con este codigo
Despues de hacer el select tal como lo tienes ahi puesto, pues deberias seguir de la siguiente manera.
Dim lector As SqlDataReader
Dim preciodisco as Integer
lector = MiComando.ExecuteReader()
if lector.Read() Then
preciodisco=Integer.Parse(lector.Item(0))
End If
lector.close()
connection.close()
Espero que este codigo te sirva de ayuda. No obstante para cualquier duda no dudes en consultar
Un saludo
Pinty
pd: En este ejemplo utilizo un if por que como maximo te deberia dar un resultado, si lo que devuelven son varios resultados deberias usar un bucle while.