ENCONTRE LA SOLUCIÓN!! =D!
Publicado por Maria (1 intervención) el 26/11/2004 20:38:32
olaaaaa!! lo puede solucionar =D, de todas manera muchas gracias a todos de verdad! MuackS! Wapishimos!
Tube k crear una segunda variable (X) y modificar el codigo que ordena la matriz:
For i = UBound (arrNotas)To LBound (arrNotas) -1
For j = UBound (arrNotas)To LBound (arrNotas) -1
If arrNotas ( j , x ) > arrNotas ( j + 1 , x)
aux = arrNotas ( j , x )
arrNotas ( j , x ) = arrNotas ( j + 1 , x )
arrNotas = aux ( j + 1 , x )
End if
Next j
Next i
***********************************************
Gracias!
Tube k crear una segunda variable (X) y modificar el codigo que ordena la matriz:
For i = UBound (arrNotas)To LBound (arrNotas) -1
For j = UBound (arrNotas)To LBound (arrNotas) -1
If arrNotas ( j , x ) > arrNotas ( j + 1 , x)
aux = arrNotas ( j , x )
arrNotas ( j , x ) = arrNotas ( j + 1 , x )
arrNotas = aux ( j + 1 , x )
End if
Next j
Next i
***********************************************
Gracias!
Valora esta pregunta


0