小奕同學(xué)基于排序算法設(shè)計了一個數(shù)字矩陣排序的程序。程序界面如圖所示，在文本框中輸入矩陣大小，點(diǎn)擊“生成”按鈕 Command1，在左側(cè)列表框  List1  中輸出一個長寬均為指定大小的隨機(jī) 整數(shù)矩陣，隨機(jī)整數(shù)范圍為【1，99】。點(diǎn)擊“排序”按鈕  Command2，結(jié)果輸出在右側(cè)列表框  List2  中，奇數(shù)行從左到右依次遞增，偶數(shù)行從右至左依次遞增，且保持輸出矩陣的長寬不變。

（1）實(shí)現(xiàn)上述功能的  VB  程序如下，顯示數(shù)據(jù)用的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'自定義對齊函數(shù)
Rem  在輸入的字符串  s 前加若干空格，輸出長度為  L 的字符串，代碼略 End  Function
PrivateSub Command1_Click （　?。?生成數(shù)字矩陣
‘隨機(jī)生成  n^2  個數(shù)字，存儲在數(shù)組  a 中，代碼略
‘以一行  n 個，共  n 行的格式顯示在  List1  中，代碼略
End  Sub
Private  Sub  Command2_Click （　?。?數(shù)字矩陣排序
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