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

A

A

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

（　?。?/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）'從文本框中讀入數列到 key 數組的代碼略
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