VB课后习题 第四章作业.doc

134页习题6、Public Class Form1 Dim a(4, 4) As Integer Dim b(4, 4) As Integer Dim c(4, 4) As Integer Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click ListBox3.Items.Clear() Dim i, j As Integer Dim ch As String ch = For i = 0 To 4 For j = 0 To 4 c(i, j) = a(i, j) + b(i, j) ch = ch & CStr(c(i, j) & Next