1. (2020高二下·慈溪期末) 小王利用循环排序思想编写了一个VB程序，用于计算下一轮比赛的出场顺序。从数据库中读取本轮比赛的人员姓名存在数组xm中，成绩存在数组cj中（成绩均不重复）。编程实现将这些成绩进行循环升序排列。要求最低成绩的位置不变，然后依次进行升序排序，即从最小值开始向下尾首相连形成升序数列。程序运行界面如图所示。点击“排序”按钮，完成循环升序排序。

1. （1） “排序”按钮的对象名为
3. （2） 请在划线处填入合适代码。

   Dim xm（1 to 100）As String ，cj（1 to 100）As Integer

   Dim flag（1 to 100）As Boolean

   Private Sub Form_ Load()

   ‘从数据库中读取数据，存储到相应数组中，并输出在列表框List1。第i个人，姓名为xm（i），成绩为cj（i）。人员数量存储到变量n中（1≤n≤100）。代码略

   End Sub

   Private Sub Cmd__Click()

   Dim min As Integer, pmin As Integer

   min = cj(1)： pmin = 1

   For i=2 To n

   If cj（i） < min Then min = cj（i）：

   Next i

   flag（pmin） = True

   pmin= pmin + 1

   If pmin=n+1 Then pmin=1

   For i=1 To n-2

   k = pmin

   For j=1 To n

   If  Then k= j

   Next j

   If k <> pmin Then

   t = cj（k）： cj（k） = cj（pmin）： cj（pmin） = t

   C = xm（k）： xm（k） = xm（pmin）： xm（pmin） = c

   End If

   flag（pmin） = True

   pmin=pmin+1

   Next i

   ’将排序后的人员姓名和成绩输出到列表框List2中，代码略。

   End Sub

5. （3） 加框处代码出错，请改正。