Visual Basic - error con inputbox

Hola a todos, como solucion el problema que me da un inputbox cuando en vez de presionar enter se la da escape el error que me aparece es "error 13 en tiempo de ejecucion, no coinciden los datos".
Gracias.

Ese error quiere decir que estas asignando a una variable de Tipo1, un dato de Tipo2, y que no son convertibles entre si, algo asi:

dim d as double
dim s as string

s = "cadena"
d = s 'ERROR!

el problema lo haz de tener despues, cuando recopilas el dato esperado.