Consulta sql en Visual

[manu_cai]

Hola de nuevo! mi problema es el siguiente:

Necesito saber cuantas peliculas hay en una fecha señalada. He hecho esto:

'Ya mas arriba abri la conexion y tal
Dim lector As MysqlDataReader
Dim sql As String
Dim comandoBD As MysqlCommand

sql = "SELECT COUNT(idpelicula) As Cant FROM peliculas WHERE fechainicio = '" & Format(cbFechaPeliHora.Value, "dd/MM/yyyy") & "' "
MessageBox.Show(sql)

comandoBD = New MySqlCommand(sql, conexionBD)
conexionBD.Open()

lector = comandoBD.ExecuteReader()

If lector.Item("Cant") >= 3 Then
Return ""
Else
Return "Valido"
End If
conexionBD.Close()

Fallo: ---> lector.Item("Cant") >= 3 <--- Invalid attempt to access a field before calling Read()

Alguna idea:S?

PD: He probado en mysql probando la consulta y funciona