15．模擬圖像局部區(qū)域處理。隨機(jī)生成n*n（n≤100，且為偶數(shù)）個“0”或“1”字符，將字符按行輸出，構(gòu)成一個n行n列初始矩陣，對該矩陣中的m行m列子矩陣（與初始矩陣同中心）進(jìn)行水平翻轉(zhuǎn)。例如，當(dāng)n為8，m為4時，構(gòu)成初始矩陣如圖a所示，將子矩陣進(jìn)行水平翻轉(zhuǎn)后得到處理結(jié)果，如圖b所示。
編寫程序，實現(xiàn)上述功能：在文本框Text1中輸入偶數(shù)n,單擊“生成”按鈕Command1，在列表框List1中顯示初始矩陣，在文本框Text2中輸入偶數(shù)m（2≤m≤n），單擊“處理”按鈕Command2，在列表框List2顯示處理結(jié)果。程序運(yùn)行界面如圖c所示。
請回答下列問題：
（1）根據(jù)程序的運(yùn)行界面，“處理”是按鈕Command2的
（單選，填字母：A.對象名/B.屬性名/C.方法/D.屬性值）。
（2）請在橫線處填入合適的代碼。
（3）程序中加框處代碼有錯，請改正。
Dim n As Integer
Dim a（1 To 100*100）As String
Private Sub Command1_Click （ ）
Dim i As Integer
n=Val（Text1.Text）
If n＜=100 And n＞=2 And n Mod 2=0 Then
For i=1 To n*n
a（i）=Chr （
）'字符“0“的ASCII碼值為48
'將初始矩陣顯示列表框List1中，代碼略
Next i
Else
List1.AddItem“輸入有誤“
End If
End Sub
Private Sub Command2_Click （ ?。?br />Dim b（1 To 100*100）As String,s As String
Dim m As Integer,y As Integer,i As Integer,R As Integer,C As Integer
m=Val（Text2.Text）
If m＞=2 And m＜=n And m Mod 2=0 Then
y=
s=““
For i=1 To n*n
R=（i-1）\n+1：C=（i-1）Mod n+1
If R＜=y Or R＞n-y Or C＜=y Or C＞n-y Then
b（i）=a（i）
Else
b（i）=a（n*C-R+1）'（3）
End If
s=s+b（i）
If i Mod n=0 Then
List2.AddItem s
s=““
End If
Next i
Else
List2.AddItem“輸入有誤“
End If
End Sub
