Visual Basic - formato en datos

Life is soft - evento anual de software empresarial
 
Vista:

formato en datos

Publicado por Sergio Martinez (6 intervenciones) el 10/10/2003 11:08:38
Hola a todos, a ver si podeis ayudarme, que yo no se como hacer esto.
Bueno el caso es que tengo un array de datos enteros, estos datos
pueden ser por ejemplo, 0, 11, -9, -12,...lo que yo quiero es
representar esos datos con un mismo formato, 000, 011, 0-9,-12, es
decir con 3 caracteres.
Por cierto son datos enteros porque proviene de ciertas operaciones
matematicas.
Espero recibir algun tipo de ayuda, un saludo y muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:formato en datos

Publicado por Pedro Luis (878 intervenciones) el 10/10/2003 12:07:40
Text1=Format(text1,"000")
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:formato en datos

Publicado por Sergio Martinez (6 intervenciones) el 10/10/2003 12:30:10
Muchisimas gracias Pedro, me has ayudado muchisimo, con esa linea ya casi tengo conseguido lo que quiero. El problema es que el signo - me lo pone fuera de la cadena de "000", pero sera cuestion de ajustarlo, supongo.
Un saludo y gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:formato en datos

Publicado por jose carlos (1 intervención) el 10/10/2003 19:41:03
conviertelo a cadena
ej. el número esta en dato
CADENA = Str(dato)
If Left(CADENA, 1) = " " Then CADENA = Right(CADENA, Len(CADENA) - 1)
If Len(CADENA) < 3 Then CADENA = String(3 - Len(CADENA), "0") + CADENA
label1 = CADENA

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:formato en datos

Publicado por Sergio Martinez (6 intervenciones) el 10/10/2003 19:50:28
Gracias jose carlos. Finalmente lo he hecho de otro modo. Os lo pongo aqui por si os sirve a alguno de vosotros.

el numero es un valor del array, si ese numero es positivo (va a estar entre 0 y 99 siempre) el formato sera "000", si es negativo sera "00" para que el tercer caracter sea el signo -

VelocidadX(p) = (VelocidadLineal * Seno)
If VelocidadX(p) >= 0 Then
VelocidadX(p) = Format(VelocidadX(p), "000")
Else
VelocidadX(p) = Format(VelocidadX(p), "00")
End If
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar