Visual Basic - Numeros negativos

Life is soft - evento anual de software empresarial
   
Vista:

Numeros negativos

Publicado por Federico (7 intervenciones) el 11/02/2008 14:12:56
Hola Estimados, Tengo Un Listbox con dos item, uno llamado 1-Positivo
y el 2-Negativo, ahora mi pregunta es la sig.
cuando el usuario elige dentro de la lista el 2 o sea negativo y da Enter yo lo que quiero que el text1 del mismo formulario que contiene un numero positivo lo combierta a negativo

muchas gracias de antemano
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:Numeros negativos

Publicado por Goku (24 intervenciones) el 11/02/2008 18:05:38
No se si habra funcion para eso, pero mientras buscas puedes hacer:

Ejm.

Te devuelve 5; entonces para mostrarlo negativo

TextBox1.text = 5 - (5*2)

¿Puede ser?
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:Numeros negativos

Publicado por Andriusmith (1 intervención) el 11/02/2008 22:38:22
Proba cn este codigo fuente:

Private Sub Lista1_Click()
If Lista1.Text = "Negativo" Then
If Numero.Text > 0 Then
A = Numero.Text
Numero.Text = A - (A * 2)
End If
End If
If Numero.Text < 0 Then
If Lista1.Text = "Positivo" Then
B = Numero.Text
Numero.Text = B - (B * 2)
End If
End If
End Sub

Salutes
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

Zas

Publicado por Yo (14 intervenciones) el 11/02/2008 22:43:48
Text1.Text = Val(Text1.Text) * -1
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