Foro de elhacker.net

buenas noches

chicos necesito de su ayuda para poder solucionar un problema que em estan dando en el instituto

se requiere lo siguiente: crear un formularios windows form para ingresar "N" cantidad de alumnos e ingresar "N" cantidad de notas
se debe mostrar el listado de alumnos ingresados y sus notas y el promedio.


tengo lo siguiente

dim alumnos(3,3) as integer
dim contador as integer
'' aqui se van agregando los valores
for i = 0 to 3
for j = 0 to 3
 alumnos(i,j)  = txtnotas.text 
next j
next i
 
'' aqui se van listando los valores
for i = 0 to 3
for j = 0 to 3
lista.items.add(alumnos(i,j))  '' la lista corresponde a un listbox
next
next

mi duda es la siguiente, al listar los numeros en el listbox se lista por ejemplo si ingreso el numero 1 se ingresan 4 numeros 1 ( 1111 ), y se deberian ingresar el primer numero 1 el sgundo y asi sucesivamente no se que estoy haciendo mal,

si alguien pudiera ayudarme con mi problema se los agradeceria.

saludos

---

[MOD]: Usa el botón "Insertar código".

Hola.

No soy mucho para las matrices pero no veo contador en los for osea el incremento i++ o j++ no se si me entiendes por eso te imprime 4 numeros 1 por que no hay incremento.

Saludos. espero te sirva si no alquien seguro te saca la duda aca.

PD usa etiquetas Geshi para entender mejor tu codigo saludos. Al lado de tipo de fuente

No se entiende bien lo que pretendes hacer, he probado el código que has mostrado y me añade los números de las dimensiones de forma sucesiva, al menos lo que yo entiendo por sucesivamente.

Da más detalles. Muestra un ejemplo del resultado que obtienes, y otro del resultado que esperas obtener.

No se si será esto lo que pretendes hacer:

Dim alumnos(3, 3) As Integer
 
'' aqui se van agregando los valores
For iOuter As Integer = alumnos.GetLowerBound(0) To alumnos.GetUpperBound(0)
 
    For iInner As Integer = alumnos.GetLowerBound(1) To alumnos.GetUpperBound(1)
        alumnos(iOuter, iInner) = (iOuter + 1) * (iInner + 1)
    Next iInner
 
Next iOuter
 
 
'' aqui se van listando los valores
Dim sb As New System.Text.StringBuilder
 
For iOuter As Integer = alumnos.GetLowerBound(0) To alumnos.GetUpperBound(0)
 
    sb.AppendFormat("Alumno {0}: ", CStr(iOuter))
 
    For iInner As Integer = alumnos.GetLowerBound(1) To alumnos.GetUpperBound(1)
        sb.AppendFormat(" {0} ", CStr(alumnos(iOuter, iInner)))
    Next iInner
 
    sb.AppendLine()
 
Next iOuter
 
With ListBox1
    .SuspendLayout()
    .Items.AddRange(sb.ToString.Split(Environment.NewLine))
    .ResumeLayout()
End With
 
sb.Clear()

(http://i.imgur.com/tT3eMkC.jpg)

Saludos