1. 小王设计了一个利用矩阵“翻转法”实现矩阵逆序输出的程序,其功能为:运行程序时,在文本框 Text1 中输入矩阵大小n,点击“产生矩阵”按钮 Command1,在列表框 List1 中显示一个 n×n 的矩阵,该矩阵数据为随机两位正奇数。点击“翻转矩阵”按钮 Command2,该矩阵翻转(水平翻转和垂直翻转均要实现)后显示在列表框 List2 中,再点一次“翻转矩阵”按钮 Command2,列表框 List2 中显示的矩阵被还原为初始状态。程序运行界面如图所示。

实现上述功能的VB程序如下,请回答下列问题:

(1) 在上图的程序运行界面基础上,再连续两次单击Command2按钮,则列表框List2中第一行显示的内容是
(2) 实现此程序的代码如下,请完成下划线程序填空。

Dim n As Integer

Dim L As String

Dim i as Integer

Dim j as Integer

Dim a(1 To 100) As Integer

Dim b(1 To 100) As Integer

Private Sub Command1_Click()

  n = Val(Text1.Text)

  Randomize

  For i = 1 To n * n

    a(i) =  + 1

  Next i

  For i = 1 To n

    L = ""

    For j = 1 To n

      L = L + " " + Str(a((i - 1) * n + j))

    Next j

    List1.AddItem L

  Next i

End Sub

Private Sub Command2_Click()

  List2.Clear

  For i = 1 To n

    L = ""

    For j = 1 To n

      b((i - 1) * n + j) = 

      L = L + " " + Str(b((i - 1) * n + j))

    Next j

    List2.AddItem L

  Next i

  For i = 1 To n * n

    a(i) =

  Next i

End Sub

【考点】
常量、变量及变量的赋值; 循环结构语句及程序实现;
【答案】

您现在未登录,无法查看试题答案与解析。 登录
综合题 普通
能力提升
换一批