Visual Basic - Autogenerar Codigo en un proyecto ncapas

---------Procedimiento almacenado en sql Server-----
CREATE PROC SpTMovimientoCodigo
AS
SELECT (RIGHT('000'+LTRIM(RIGHT(ISNULL((SELECT MAX(ID_MOV) FROM dbo.TBMovimiento),'000'),4)+1),4))
--------------------------------------------------------------------------
Tengo una tabla Movimiento el cual me da el formato '0001' en sql
el problema es que al momento de llamarlo al proyecto en n capas en visual en el formulario solo me sale
' 1' y al llegar al registro '10' no me permite seguir llenando datos y ya no me muestra el numero mayor
quisiera que me saliera 0001 en el formulario
adjunto imagenes




Ayuda...