Visual Basic - ayuda con codigo!!!

Life is soft - evento anual de software empresarial
   
Vista:

ayuda con codigo!!!

Publicado por rafa (1 intervención) el 13/09/2008 03:54:49
hola a todos soy nuevo en esto de VB y ya me atore con mi codigo, miren es simple el rpograma, por medio de un inputbox meter 9 datos(nombres) y despues ordenarlos y uqe me apraescan en mi caja de texto, todo sale bien hatsa la hora de ordenar, se que le tengo que asignar su valor en ascii pero no se como les dejo el codigo para qeu lo chequen y me digan en que me equivoque, urge!!! de ante mano gracias!

Private Sub Command1_Click()
Dim x, y, z, dato(8) As Integer
Dim ingresar(8) As String
Dim a, aux As Long
For x = 0 To 8 Step 1
ingresar(x) = InputBox("Nombre", "Dame nombres")
Next x
For z = 0 To 8 - 1 Step 1
For a = 0 To 8 - 1 Step 1
If ingresar(a) > ingresar(a + 1) Then
ingresar(a) = aux
ingresar(a + 1) = ingresar(a)
aux = ingresar(a + 1)
Else
ingresar(a) = ingresar(a)
Next a
Next z
For y = 0 To 8 Step 1
Text1.Text = Text1.Text & ingresar(y) & ", "
Next y
End Sub
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:ayuda con codigo!!!

Publicado por igor (633 intervenciones) el 13/09/2008 11:27:20
El "Step 1" en el for no es necesario, es el incremento por defecto.

Para ordenar busca el método de la burbuja.
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:ayuda con codigo!!!

Publicado por Manu (1 intervención) el 13/09/2008 22:42:17
ya te dieron la respuesta aqui

http://www.forosdelweb.com/f69/ayuda-con-codigo-624378/

si tienes dudas consulta pero no aca sino alla
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