
实现上述功能的VB程序如下,请回答下列问题:
(1)要让窗体左上角显示“矩阵转换”文字,应该通过修改该窗体的______(单选,填字母:A.Font/B.Caption/C.Text)属性
(2)请在划线处填入合适的代码。
Const k=5
Dim a(1 To k * k)As Integer
Private Sub Form_Load()
‘生成数组a并以矩阵形式显示在列表框list1中
End Sub
Private Sub Commandl_Click()
Dim b(1 Tok,k * k)As Integer
Dim n As Integer
Dim row As Integer,col As Integer
Dim s As String
s=""
n=Val(Text1.Text)
For i=1 To k * k
row=(i-1)\k+1
__________
If row=n Then
b(i)=a((col-1)*k+n)
ElseIf col=n Then
______________
Else
b(i)=a(i)
End If
s=s+Str(b(i))
If_________Then
List2.AddItem s
s=""
End If
Next i
End Sub

同类型试题

y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2


y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2

