No le veo errores en tu clase mas que ortográficos......
Cita: Dim objBicicleta as Bicicleta = New Bicicleta
Dim VelocidadActual as Integer
objBicicleta.Modelo = "Montaña" 'te faltaba la "c"
objBicicleta.Precio = 200
objBicicleta.NumeroDeVelocidades = 21
objBicicleta.Acelerar(5)
objBicicleta.Frenar()
VelocidadActual = objBicicleta.ConsutarVelocidad 'aqui también está mal escrito tu métod
Salu2