Visual Basic - MUY URGENTE, fácil, pero MUY URGENTE

Pasar un texto de decimal a decimal es fácil ¿no?
text2.Text = Dec(Text1.Text)
Bien, mi problema es que cuando el número que quiero convertir a hexadecimal comienza por 0 (cero) no me lo reconoce.
Ejemplo:
el número 0155838498 si reconoce el 0 (cero) nos dá :22E84909
peor si no lo reconoce nos da: 949E822

Por favor, es muy urgente y tengo que solucionarlo. Tengo un programa que si reconoce el 0, pero no tengo el fuente. Gracias.

Para pasar un texto a decimal primero debes de tener cuidado de que no se filtren caracteres no numericos,. una vez que lo haz hecho utiliza la función cdec(valor numerico) para convertir en decimal la cantidad, y para convertir la cantidad en hexadecimal utiliza la función hex(valor numerico). Ejemplo:

Text2.Text = CDec(Text1.Text)
Text3.Text = Hex(Text4.Text)