根据用户输入的n值,利用随机函数产生一个n*n矩阵,数据 '取值防卫在【10,90】之间,计算矩阵周边元素之和 Private Sub Form_Click() Dim a() As Integer Dim n As Integer Dim i As Integer, j As Integer Dim sum As Integer n = Val(____________("n=")) ___________ a(1 To n, 1 To n) sum = 0 For i = 1 To n For j = 1 To n a(i, j) = 10 + Int(81 * Rnd()) Print a(i, j); If i = 1 Or j = 1 Or __________ Or___________ Then sum = sum +________________ End If Next j Print Next i Print "sum ="; sum End Sub