学进去

根据生成的两位数，实现数据分组输出。具体的步骤是：先对数据进行升序排序，再按十位值的大小逐行输出。要求：十位为奇数从左往右递增，十位为偶数则从左往右递减。
编写VB程序，实现上述功能。运行程序，在文本框Text l中输入两位数的个数（不超过100），单击“输出”按钮Command1，在列表框List l输出结果。程序运行界面如图a所示。

请回答下列问题：
（1）通过双击图b中_______的控件（填序号，可以在VB当前窗体中添加一个文本框Text l。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
（3）程序中加框处代码有错，请改正。
Private Sub Command1Click）

Dim a（1 To 101）As Integer

Dims As String

Dim i As Integer，j As Integer，m As Integer，n As Integer，k As Integer，t As Integer

Randomize

List1.Clear
'生成n个两位正整数并保存到数组a中，代码略

①_______

For i=1 Ton\2

m= ②_____

For j=1To m

     If a（j）>a(j+1）Then t=a（j）：a(j)=a（j+1）：a(j+1）=t

Next j

k=m

For j= ③____

     If a(j)>a(k) Then k=j

Next j

If m<>k Then t=a(m):a(m)=a(k):a(k)=t

Next i

s=""

For j=1 To n

If a(j)\10 Mod 2=1Then s=s+Str(a(j)) Else s=Str(a(j))+s

If Then   _____

List1. AddItem s

s=""

End If

Next j

End Sub