problema con textbox

[analoyra]

Hola gente del foro, soy nueva y como veo que la gente colabora decidi probar

les cuento que tengo un problema con VB6. tengo que hacer una consulta a una tabla y a ese numero sumarle 1 y mostrarlo en un textbox completando lo que falta con 0 a la izquierda (tengo que ver 8 digitos), lo que hago es convertir a string y viceversa ... hasta ahi todo bien, salvo que el texbox me saca los 0. ya probe maskedit....
lo mejor que logre es esto

num = CStr(rsAux(2))
Sum = CStr("00000001")

TxtNumComp.Text = CInt(Val(num) + Val(Sum))

como hago que el textbox me coloque por ejemplo 00000023 en vez de 23??

Espero me puedan ayudar..... desde ya gracias!!!

[fonchi]

Hola:

Lo que se me ocurre es que guardes el valor que rescatas de la base de datos
le hagas la suma y la guardes en una variable. Luego lo que podrias hacer es
unir y poner ceros segun resultado.


ejemplo :
si el resultado final es >10

mostrar.text= 0000000 & variable
(de 1 a 9 muestro con 7 ceros)

si el resultado final es >100 y mayor igual a 10

mostrar.text= 000000 & variable
(de 10 a 99 muestro con 6 ceros)

Bueno asi vas viendo. Espero te sirva la idea.

Salu2.

[Avellaneda]

Hola, es algo mas sencillo que eso:

Código:

TxtNumComp = Format(TxtNumComp, "00000000") 

Un saludo

[analoyra]

Gracias a los 2!! los probe y funciono perfecto.. me salvaron..