小刘在玩一个数字游戏，给定一个n位正整数（n＜=20），根据设定的保留位数，舍去一部分数字，剩下的数字按原次序组成一个最大的新数．例如原数34625803，保留4位，最大数为6803．算法是：先确定最高位的数字，在第1位至最后3位数字前的34625中找到最大的数6，从而确定最高位是6，再确定次高位的数字，从6后面的数开始到最后2位数字前的258中找到最大数8，确定次高位是8，依次找下去得到最大新数．他设计了一个VB程序来进行验证，在文本框Text1中输入一个n位正整数，在文本框Text2中输入保留的位数，点击“确定”按钮，在文本框Text3中输出保留的最大新数．程序运行界面如图所示．

（1）如果输入的原数是3635132，保留4位数字，则输出的新数是

6532

6532

．
（2）实现上述功能的VB代码如下，请在横线处填入合适代码．
Private Sub Command1_Click （　　）
Dim a（1To 20）As String
Dim ys As String,xs As String'xs记录最大的新数
Dim k As Integer,h As Integer,n As Integer
Dim i As Integer,j As Integer
Dim F As Boolean
xs=““
ys=Text1．Text
n=Len（ys）
k=Val（Text2．Text）
F=True
If ys=““Or n＞20Or k=0Or k＞n Then
Label4．Caption=“输入的原数或保留位数不符，请重输！“
F=False
End If
For i=1To n
       ①
If a（i）＜“0“Or a（i）＞“9“Then
Label4．Caption=“输入的原数不是数字，请重输！“
Text1．Text=““
F=False
End If
Next i
If F=True Then
h=1
For i=1To k
For j=h To     ②
If a（j）＞a（h） Then h=j
Next j
xs=xs+a（h）
h=h+1
Next i
Text3．Text=xs
End If
End Sub.