como puedo ahcer esto?

Hola Sonia,
Disculpa... pero por lo que explicas no es problema del numero que entras,
parece ser que es la funcion que devuelve el generador, si cuando entras 14
genera 2345, cuando entras 04 deberia devolver 1234... si no es asi... es que
no estoy entendiendo el problema.

De todas maneras puedes conocer la longitud del texto entrado y modificarlo
como sigue :
If Me.TextBox1.TextLength < 5 Then
Me.TextBox1.Text = Format(Val(Me.TextBox1.Text), "000000")
End If

Espero quie te sirva.
Pep,

[MVP] Visual Developer - Visual Basic


"Sonia" escribió:

hola!
tengo un form donde pongo 2 digitos en un textbox y se genera un numero de 6
digitos en otro textbox que empieza por esos 2 digitos q he introducido.
el numero q se genera es 1+ q el q hay en la bd q empieza x esos 2 digitos.
el problema es el siguiente.

si por ejemplo pongo '14'
se genera el num '142345' okkk

pero si el numero q pongo empieza con '0'. ej: '04'
se genera el numero '04354' SOLO 5 DIGITOSSS
y esto me provoca un gran error en la bd

esto se puede arreglar? o ...se puede decir a un textbox q si solo hay 5
digitos, q se ponga un '0' delante? como podria hacer esto?
gracias!!

Hola, si tenes en BD los nro. 142344 y 042344 y queres que se genere el
siguiente podes hacer esto.
Para hacerlo censillo, el nro de la BD se lo asignas a un text box
invisible.

dim nro as string
nro=trim(me.TxtDeBD.text.remove(0,2)) ' Esto te corta los dos primeros
caracteres dejandote solo los restantes.
nro=nro+1 ' La conversión string a int y viceversa se hace sola.
nro=trim(me.TxtNroDosDigitos.text) + nro

esto deberia cortar los dos primeros digitos de los nro de la BD.

142344 042344
2344 2344

sumarle 1

2345 2345

y concatenar el nro de dos digitos del text box.

142345 042345




Espero te sirva.


Daniel.


"Sonia" escribió en el mensaje
news:

hola!
tengo un form donde pongo 2 digitos en un textbox y se genera un numero de
6
digitos en otro textbox que empieza por esos 2 digitos q he introducido.
el numero q se genera es 1+ q el q hay en la bd q empieza x esos 2
digitos.
el problema es el siguiente.

si por ejemplo pongo '14'
se genera el num '142345' okkk

pero si el numero q pongo empieza con '0'. ej: '04'
se genera el numero '04354' SOLO 5 DIGITOSSS
y esto me provoca un gran error en la bd

esto se puede arreglar? o ...se puede decir a un textbox q si solo hay 5
digitos, q se ponga un '0' delante? como podria hacer esto?
gracias!!

gracias x lo de la longitud del texto.
lo otro no se trataba de eso
era simplemente generar un codigo de 6 digitos, donde tu pones en un textbox
el codigo portal de la provincia q seran los 2 primeros digitos de ese
codigo q hay q generar++es por eso q cuando buscaba en la bd el ultimo
codigo generado q empezada con esos 2 digitos yo le tenia q sumar uno y era
entonces cuando si los 2 digitos eran por ejemplo '12' se generaba el numero
12xxxx, pero si eran los 2 primeros diigitos 0x
como le sumo uno se generaban solo 5 digitos eliminando el 0 . ej: xxxxx
"Pep" escribió en el mensaje
news:

Hola Sonia,
Disculpa... pero por lo que explicas no es problema del numero que entras,
parece ser que es la funcion que devuelve el generador, si cuando entras

14

genera 2345, cuando entras 04 deberia devolver 1234... si no es asi... es

que

no estoy entendiendo el problema.

De todas maneras puedes conocer la longitud del texto entrado y

modificarlo

como sigue :
If Me.TextBox1.TextLength < 5 Then
Me.TextBox1.Text = Format(Val(Me.TextBox1.Text), "000000")
End If

Espero quie te sirva.
Pep,

[MVP] Visual Developer - Visual Basic


"Sonia" escribió:

> hola!
> tengo un form donde pongo 2 digitos en un textbox y se genera un numero

de 6

> digitos en otro textbox que empieza por esos 2 digitos q he introducido.
> el numero q se genera es 1+ q el q hay en la bd q empieza x esos 2

digitos.

> el problema es el siguiente.
>
> si por ejemplo pongo '14'
> se genera el num '142345' okkk
>
> pero si el numero q pongo empieza con '0'. ej: '04'
> se genera el numero '04354' SOLO 5 DIGITOSSS
> y esto me provoca un gran error en la bd
>
> esto se puede arreglar? o ...se puede decir a un textbox q si solo hay 5
> digitos, q se ponga un '0' delante? como podria hacer esto?
> gracias!!
>
>
>
>