将若干个元素排列成r×c规模矩阵，现要对r×c规模的矩阵实现行交换，小明设计了实现矩阵行交换的程序。程序运行时，产生r×c个随机数，随机数范围为[10，99]，随机数存储在数组a中，并以矩阵的形式在列表框List1中显示，在Text1中输入m,Text2中输入n,单击“交换行”按钮Command1，实现矩阵第m行与n行进行交换。例如：随机产生了15个元素排列成5×3规模的矩阵，当m=1，n=5则将矩阵第1行与第5行进行交换，其他不变，程序运行界面如图所示。小明依据上述描述设计了如下VB程序。

Dim r As Integer′矩阵行数
Dim c As Integer′矩阵列数
Dim a（1 To 100）As Integer
Private Sub Form_Load （　　）
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的随机整数
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（　　）
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
请回答下列问题：
（1）若生成矩阵如图所示，若文本框Text1中输入m为2，Text2中输入n为4时，单击“交换行”按钮 Command1，程序运行结束，数组元素a（5）的值为

14

14

。
（2）请在横线处填入合适的代码。