Visual Basic - ELIMINAR CARACTER SI ES 0

Hola amigo, quisiera saber que rutina puedo utilizar para
eliminar un caracter, ya que mi aplicacion al ingresar un
codigo y vea que el primer digito es 0 tendria que
eliminarlo ya que utilizo por ejemplo:
Centro = Mid(txtnosobre, 12, 5)
Mesa = Mid(txtnosobre, 18, 2)
Tomo = Mid(txtnosobre, 21, 1)

Y en los casos que se me presenten los codigos con el
primer numero en 0 me afectaria el orden de la cadena ya
que la mayoria de los codigos vienen sin 0... Agradezco de
tu ayuda para ver como podemos hacer y eliminar ese 0, me
imagino que es por una condicion... Gracias

si sólo quieres eliminar los 0 por la izquierda y son códigos numéricos, ¿Por qué no lo pasas a long con CLong(variable) y luego lo vuelves a pasar a string con CString(Variable)?