vb中怎么把矩阵的主对角线元素选出来

2026年09月23日 13:02

有2个网友回答

网友（1）：

假设数组a(3,3)是一个4*4和矩阵，j表示例标，i表示行标。每个数点6个字符。输出显示控件为TextBox
TextBox1.Text &= "显示对角线上的数" & vbCrLf
For j = 0 To 3
For i = 0 To 3
If j = i Or (i + j = 3) Then
TextBox1.Text &= CStr(a(i, j)).PadLeft(6)
Else
TextBox1.Text &= Space(6)
End If
Next
TextBox1.Text &= vbCrLf
Next

网友（2）：

vb中怎么把矩阵的主对角线元素选出来
print "主对角线上的元素是："
for i=0 to n-1
for j=10 to n-1
if i=j then print a(i,j);
next j
next i