小王計(jì)劃使用VB制作一個(gè)掃雷小游戲，他首先需要生成一個(gè)“雷區(qū)”：
①生成n*n的矩陣，其中計(jì)劃埋雷m 個(gè)，n和m 的數(shù)據(jù)分別從text1和text2中獲取（n＜=10，m＜=n）
②隨機(jī)位置埋好地雷后（埋雷位置用X表示且埋雷位置不重復(fù)），未埋雷的位置顯示該位置周圍一圈地雷的數(shù)量。
程序代碼如下：
Dim flag（0 To 200）As Boolean,a（0 To 200）As String
Dim n As Integer,m As Integer
Private Sub Command1_Click

（　?。?/div>

（　　）

Dim s As String,x As Integer,k As Integer
Dim i As Integer,j As Integer
Randomize
n=Val（Text1.Text）：m=Val（Text2.Text）
’初始化數(shù)組flag中各元素均為False,數(shù)組 a中各元素值為字符“0“，代碼略
For i=1 To m
x=Int（Rnd*（n^2））+1
If flag（x）=True Then i=i-1 Else flag（x）=True
Next i
For k=1 To n*n
If flag（k）=True Then
a（k）=“X“
Else
For i=（k-1）\n To （k-1）\n+2
For j=

（k-1）ModnTo（k-1）Modn+2

（k-1）ModnTo（k-1）Modn+2

If i=0 Then Exit For
If flag（（i-1）*n+j）=True And j＞=1 And j＜=n Then
a（k）=

Chr（Asc（a（k））+1）

Chr（Asc（a（k））+1）

End If
Next j
Next i
End If
Next k
For i=1 To n*n’在列表框list1中輸出矩陣
s=s+““+a（i）
If 

iModn=0

iModn=0

 Then
List1.AddItem s
s=““
End If
Next i
End Sub
根據(jù)上述代碼，完成下列問題：
（1）上圖框中位置未埋雷，且數(shù)字被遮擋，請問該位置中應(yīng)填寫的數(shù)字是

3

3

。
（2）請?jiān)跈M線處填上合適的代碼。