小許最近剛學(xué)了一種數(shù)據(jù)儲存結(jié)構(gòu)——鏈表，于是他準(zhǔn)備實(shí)驗(yàn)一番。鏈表將每一個存放數(shù)據(jù)的存儲單元，分為兩個部分，一個用來放數(shù)據(jù)（key），另一個用來存放下一個單元的位置（nxt）。例如：Key（1）=1，nxt（1）=10 表示當(dāng)前位置的值為 1，且下一個位置在 10 號位。
現(xiàn)在有一串混亂且不重復(fù)的數(shù)字，小許想逐個把數(shù)字插入到鏈表里面，且最后訪問鏈表時數(shù)字是有   序的。
例如：輸入數(shù)據(jù) 1，3，2。那么可能的鏈表是：Key（1）=1，nxt（1）=3
Key（2）=3，nxt（2）=0（以 0 表示結(jié)尾）
Key（3）=2，nxt（3）=2
那么我們在最后訪問時，先在位置找到 1，再跳到 nxt（1）也就是 3 號位得到 key （3），以此類推，最終依然可以輸出一個有序的數(shù)列。
編寫 VB 程序，實(shí)現(xiàn)上述鏈表功能。運(yùn)行程序，在文本 Text1 中輸入數(shù)據(jù)個數(shù)，在 Text2 中輸入數(shù)列，單擊“排序”按鈕，在 Text3 中輸出排序后的結(jié)果。程序運(yùn)行界面如圖所示。
請回答下列問題：
（1）若要清空窗體的標(biāo)題內(nèi)容“Form1”，能實(shí)現(xiàn)該功能的語句是

A

A

（ 單選，填字母：
A.Form1.Caption=““/B.Form1.Text=““/C.Form1.Clear）
（2）實(shí)現(xiàn)上述功能的 VB 程序如下，請在橫線處填入合適的代碼。
（3）程序中加框處代碼有錯，請改正。
Private Sub Command1_Click

（　?。?/div>

（　?。?/div>
Dim n As Integer,st As Integer,now As Integer,ans As String,i As Integer Dim key（20）As Integer,nxt（20）As Integer
n=Val（Text1.Text）'從文本框中讀入數(shù)列到 key 數(shù)組的代碼略
st=1
①

i=2或i=st+1

i=2或i=st+1

Do While i＜=n
If key（st）＞key（i） Then nxt（i）=st
st=i
Else
now=st：flag=1
Do While nxt（now）＜＞0

If key（nxt（now））＞key（i） Then nxt（i）=nxt（nxt（now）） nxt（now）=i
flag=0 Exit Do
End If
②

now=nxt（now）

now=nxt（now）

Loop
If flag=1 Then
nxt（now）=i End If
End If i=i+1
Loop now=st
Do While nxt（now）＜＞0

ans=ans+Str（key（now））+“-＞“now=nxt（now）
Loop
Text3.Text=③

ans+Str（key（now））

ans+Str（key（now））

End Sub