將若干個(gè)元素排列成r×c規(guī)模矩陣，現(xiàn)要對(duì)r×c規(guī)模的矩陣實(shí)現(xiàn)行交換，小明設(shè)計(jì)了實(shí)現(xiàn)矩陣行交換的程序。程序運(yùn)行時(shí)，產(chǎn)生r×c個(gè)隨機(jī)數(shù)，隨機(jī)數(shù)范圍為[10，99]，隨機(jī)數(shù)存儲(chǔ)在數(shù)組a中，并以矩陣的形式在列表框List1中顯示，在Text1中輸入m,Text2中輸入n,單擊“交換行”按鈕Command1，實(shí)現(xiàn)矩陣第m行與n行進(jìn)行交換。例如：隨機(jī)產(chǎn)生了15個(gè)元素排列成5×3規(guī)模的矩陣，當(dāng)m=1，n=5則將矩陣第1行與第5行進(jìn)行交換，其他不變，程序運(yùn)行界面如圖所示。小明依據(jù)上述描述設(shè)計(jì)了如下VB程序。

Dim r As Integer′矩陣行數(shù)
Dim c As Integer′矩陣列數(shù)
Dim a（1 To 100）As Integer
Private Sub Form_Load （　?。?br />Dim i As Integer,s As String
Randomize
List l.Clear
r=Int（Rnd*5）+3
c=Int（Rnd*5）+3
For i=1Tor*c
a（i）=①

Int（Rnd*90+10）

Int（Rnd*90+10）

'生成10～99的隨機(jī)整數(shù)
s=s+Str（a（i））
If i Mod c=0 Then
List1．Add Items
s=″″
End If
Next i
End Sub
Private Sub Command1_Click（　?。?br />Dim m As Integer,n As Integer,s As String
m=Val（Text1．Text）：n=Val（Text2．Text）
List2．Clear
For i=1To②

c

c

k=a（（m-1）*c+i）
a（（m-1）*c+i）=a（（n-1）*c+i）
a（（n-1）*c+i）=k
Next i
For i=1 To r
For j=1 To c
s=③

s+Str（a（i-1）*c+j））

s+Str（a（i-1）*c+j））

Next j
List2．AddItem s
s=″″
Next i
End Sub
請(qǐng)回答下列問題：
（1）若生成矩陣如圖所示，若文本框Text1中輸入m為2，Text2中輸入n為4時(shí)，單擊“交換行”按鈕 Command1，程序運(yùn)行結(jié)束，數(shù)組元素a（5）的值為

14

14

。
（2）請(qǐng)?jiān)跈M線處填入合適的代碼。