Saltar al contenido

Ayuda con adjuntar 0 en texbox con tamaño predefinido

publicado

Hola buenas tardes espero esten bien, tengo dos dudas

1.- Uso un texbox el cual lo ingreso con un formulario el cual puedo ingresar un CHAR de numeros de 1 a 6 caracteres.

Ocupo que el si ingreso 1 digito se pongan 5 ceros, o si digito un 2 se pongan 4 ceros, En el libro donde lo Guardo.

Ejemplo:

1 - 000001

23 - 000023

431 - 000431

5412 - 005412

67123 - 067123

123456 - 123456

Supongo tendre que sacar la longuitud del campo ingresado y comparlo y si es diferente entones agregarle ceros, pero soy nuevo en visual y no se como hacerlo.

2.-Mi segunda duda es parecida tengo un campo de texto el cual puede aceptar 120 caracteres si ingreso 20 caracteres que se hagan 100 espacios, si ingreso 40 caraceteres se hagan 80 espacios.

Featured Replies

publicado

Hola Josefran .... a ver si esto te sirve de orientacion....

TextBox1 = Format(TextBox1, "0000" & Ceros)

Un saludo

publicado
  • Autor

1.-Mi duda es tengo un campo de texto el cual puede aceptar 120 caracteres de maximo si ingreso 20 caracteres que se hagan 100 espacios en blanco, si ingreso 40 caraceteres se hagan 80 espacios. Les dejo la imagen y el codigo en link Gracias.

Supongo tendre que sacar la longuitud del campo ingresado y comparlo y si es diferente entones agregarle ceros, pero soy nuevo en visual y no se como hacerlo.

Dropbox - descripcion.zip

http://imageshack.com/a/img856/4748/cgr4.png

publicado
  • Autor

Resolvi mi segunda duda

con esto

VBA.Space (120 - VBA.Len(TextBox1.Text)) & TextBox1.Text

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.