作业帮 > 综合 > 作业

编写VB程序,建立并输出一个n×n的矩阵,该矩阵对角线上的元素为4,其余元素均为-1

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/29 17:49:25
编写VB程序,建立并输出一个n×n的矩阵,该矩阵对角线上的元素为4,其余元素均为-1
Private Sub Command1_Click()
sub_Matrix (10) ‘打印10*10矩阵
End Sub
Private Sub sub_Matrix(ByVal N As Integer)
Dim I As Integer
Dim J As Integer
Dim k As Integer
k = 3 'k决定打印的字符间的空隙大小
For I = 1 To N
For J = 1 To N
If I = J Or (J = N - I + 1) Then
Me.Print Spc(k); 4;
Else
Me.Print Spc(k); -1;
End If
Next
For J = 1 To k
Print
Next
Next
End Sub
再问: 这个好像运行不出来耶
再答: 你不会那么懒吧?程序我专门测试通过了的。 你整一个窗口,窗口上放一个按钮,name=" Command1" 运行窗口后,点击按钮command1就会看到效果。
再问: 请问能否截图告诉一下“窗口上放一个按钮,name=" Command1"” 具体怎么弄?或者放不方便把文件发我邮箱,因为我第一次接触Excel,所以实在不太会操作,麻烦你了,谢谢了~~~ 邮箱:1121428159@qq.com