回文数是从左向右读和从右向左读结果一样的数字串，例如：1和363都是回文数编写VB程序，构造一个大于给定正整数n的最小回文数p,构造方法如下
（1）根据数字串n的左半部分子串st,构造对称的右半部分，生成回文数p
（2）若p＞n,则p即为最小回文数，如：98712→98789
（3）若p＜=n则需重新构造p,方法是：从右向左查找字符串st中第一个“9”的字符；若不存在，则生成形如“10…01”的回文数p,p的长度比n的长度多1位，如：9999→10001若存在，则将第一个非“9”字符加1，并将该字符后面部分用字符“0“填充，最后构造对称的右半部分，生成回文数p。如：98992→99099，
实现上述功能的VB程序如下，请回答下列问题：
（1）如果n为69999，则p为

70007

70007

。
（2）请在横线处填入合适的代码
Private Sub Command1_Click（　　）
Dim n As String,st As String.p As String
Dim In As Integer.i As Integer.j As Integer
n=Text1．text
ln=Len（n）
st=Mid（n,1，＜ln+1＞\2）
p=st
For i=ln\2To1 Stop-1
  p=p+Mid（n,i,1）
Next i
If

①

①

Then
   i=（ln+1）\2
Do While i＞0
If Mid（st,i,1）=“9“Then

②

②

EIse Exit Do
Loop
If i＜1 THen
    p=“1“
    For i=2 To In
       p=p+“0“
    Next i
   p=p+“1“
Else
   p=Mid（st,1，i-1）
   p=p+Chr（Asc（Mid（st,i,1））+1）
   For j=i+1 To ln-i
     p=p+“0“
   Next j
      If

③

③

Then p=p+Mid（p,i,1）
      For j=i-1 To Step-1
      p=p+Mid（p,j,1）
      Next j
     End If
  End If
End If
Text2．Text=p
End Sub