Visual Basic - Varias funciones

Life is soft - evento anual de software empresarial
 
Vista:

Varias funciones

Publicado por BPD (4 intervenciones) el 09/09/2004 22:33:17
hola bueno tengo un problema tengo 10 textos en los cuales metos numero para que en 10 labesl me de el resualdo de un calculo estos textos estan ordenados del 1 al 10 el probelma es que el text 1 tiene que ser mayor al texto 2 y asi el 2 mayor que el 3.... bueno e intentado con if......then pero no me da resultado quiseira saber que otra coa puedo usar que para cunado unos de ese textos no esten en el orden que les corresponder no deje calcular y mande un aviso.

Gracias espero que allan entendido :)
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:Varias funciones

Publicado por Ruri (583 intervenciones) el 10/09/2004 02:39:15
BPD:
Probé este código y funciono.
Dim f As Boolean
If Val(Text1.Text) > Val(Text2.Text) Then
If Val(Text2.Text) > Val(Text3.Text) Then
If Val(Text3.Text) > Val(Text4.Text) Then
If Val(Text4.Text) > Val(Text5.Text) Then
If Val(Text5.Text) > Val(Text6.Text) Then
If Val(Text6.Text) > Val(Text7.Text) Then
If Val(Text7.Text) > Val(Text8.Text) Then
If Val(Text8.Text) > Val(Text9.Text) Then
If Val(Text9.Text) > Val(Text10.Text) Then
f = True
End If
End If
End If
End If
End If
End If
End If
End If
End If
If f = False Then MsgBox "Error"
Saludos Ruri
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:Varias funciones

Publicado por BPD (4 intervenciones) el 10/09/2004 06:29:46
mucha gracia me es de gran ayuda el codigo :)
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