Dim n As Integer

Dim a(1 To 100) As Integer

Dim b(1 To 100) As Integer

Private Sub Form Load()

‘读取若干数据依次存储到数组a中，并将数据元素的总个数存储到变量n中。

‘将每段数据的元素个数及排序的次序依次存储到数组b中；

‘b(1)、b(2)分别存储第1段数据的元素个数、排序的次序，

‘b(3)、b(4)分别存储第2段数据的元素个数、排序的次序，.....

“代码略。

End Sub

Private Sub Command1_Click())

    Dim i As Integer, j As Integer, k As Integer, t As Integer

    Dim pb As Integer, endpos As Integer

    pb=1: endpos =b(1)

    For i=1 To n-1

        If i=endpos Then

            pb=pb+2:i=endpos+1

               ①  

        End If

        k=i

        For j =i+1 To endpos

            If  Then k=j     ‘⑵

        Next j

        If k<>i Then

                ②  

        End If

    Next i

    Text3.Text =""     ‘⑷

    For i=1 To n

        Text3.Text=Text3.Text + Str(a(i))

    Next i

End Sub

result=[]

i=0#用于遍历1st1

j=0#用于遍历1st2

while i<len(lst1) and j<len(lst2) :#①

    if lst1[i]<lst2[j]:

        result.append(lst1[i])

        i+=1

    else:

        result.append(lst2[j])

        j+=1

while i<len(lst1):

    result.append(lst1[i])  #②

    i+=1

while j<len(lst2):

    result.append(lst2[j]) #③

    j+=1

下列说法不正确的是（   ）