小奕同学基于排序算法设计了一个数字矩阵排序的程序。程序界面如图所示，在文本框中输入矩阵大小，点击“生成”按钮 Command1，在左侧列表框  List1  中输出一个长宽均为指定大小的随机 整数矩阵，随机整数范围为【1，99】。点击“排序”按钮  Command2，结果输出在右侧列表框  List2  中，奇数行从左到右依次递增，偶数行从右至左依次递增，且保持输出矩阵的长宽不变。

（1）实现上述功能的  VB  程序如下，显示数据用的additem  是一种

C

C

（单选，填字母：A．属性名
/B．事件名/C．方法名/D．过程名）。
 （2）请在横线处填入合适的代码。
（3）程序中加框处代码有错，请改正。Dim  a（1  To  100）As  Integer
Dim  n As  Integer
Function  dq（s  As  String,L As  Integer）  As  String'自定义对齐函数
Rem  在输入的字符串  s 前加若干空格，输出长度为  L 的字符串，代码略 End  Function
PrivateSub Command1_Click （　　）'生成数字矩阵
‘随机生成  n^2  个数字，存储在数组  a 中，代码略
‘以一行  n 个，共  n 行的格式显示在  List1  中，代码略
End  Sub
Private  Sub  Command2_Click （　　）'数字矩阵排序
Dim  i As  Integer,k As  Integer,j As  Integer,s As  String
Dim  f As  Boolean
List2．Clear f=True
For  i=1 To  n^2 Step  n s=″″
For  j=i To 
k=n^2
Do  While①
If a（k）＜a（k-1）Then
t=a（k）：a（k）=a（k-1）：a（k-1）=t
End  If
k=k-1
Loop
If f=True  Then
s=s+″″+dq（Str（a（j）），2）Else
s=″″+dq（Str（a（j）），2）+s
End If Next  j List2．AddItem  s
②  Next  i
End  Sub