ماتریس ها

[mona rahimi]

برنامه اي كه دو ماتريس 5*5　　را با هم جمع مي كند.
vb6

 

[the_king]

برنامه اي كه دو ماتريس 5*5　　را با هم جمع مي كند.
vb6

Private Sub Form_Load()
    Dim a(1 To 5, 1 To 5) As Integer
    Dim b(1 To 5, 1 To 5) As Integer
    Dim c(1 To 5, 1 To 5) As Integer
    Dim i As Integer, j As Integer
    For i = 1 To 5
        For j = 1 To 5
            c(i, j) = a(i, j) + b(i, j)
        Next
    Next
End Sub