1_Bueno aki les presento un ejercicio simple de como generar y sumar matrices
2_Utilizare visual studio 2008 (creamos un nueco proyecto de tipo Formulario windows)
3_Aki la interfaz :
(http://img146.imageshack.us/img146/216/11567586.jpg)
4:aki el
Public Class frmsuma
'declaramos variables privadas
Private m As Integer(,)
Private m2 As Integer(,)
Private m3 As Integer(,)
Button1
ReDim m(2, 2) 'redimensionamos una matriz de 3*3
ReDim m2(2, 2)
ReDim m3(2, 2)
Dim fil, col As Integer
Dim r As New Random
'generamos la matriz
For fil = 0 To 2
For col = 0 To 2
m(fil, col) = r.Next(10, 15)
m2(fil, col) = r.Next(5, 20)
Next
Next
'mostramos la matriz en el listview
lvw1.Items.Clear() 'clear para q limpie la lista cada ves q generamos
lvw2.Items.Clear() 'clear para q limpie la lista cada ves q generamos
lvw3.Items.Clear() 'clear para q limpie la lista cada ves q generamos
For fil = 0 To 2
lvw1.Items.Add(m(fil, 0))
lvw2.Items.Add(m2(fil, 0))
For col = 0 To 2
lvw1.Items(fil).SubItems.Add(m(fil, col))
lvw2.Items(fil).SubItems.Add(m(fil, col))
Next
Next
lvw3.Items.Clear()
End Sub
==aki code del btnsm
Dim fil, col As Integer
For fil = 0 To 2
For col = 0 To 2
m3(fil, col) = m(fil, col) + m2(fil, col)
Next
Next
lvw3.Items.Clear()
For fil = 0 To 2
lvw3.Items.Add(m3(fil, 0))
For col = 0 To 2
lvw3.Items(fil).SubItems.Add(m3(fil, col))
Next
Next
End Class
_Ojala les sirva