試題五(15分，每空3分)

　　閱讀以下說明及Visual Basic 程序代碼，將應填入___(n)___處的字句寫在答題紙的對應欄內。

　　[說明]

　　本程序實現如下功能：首先，單擊“生成”按鈕，生成一個由10個隨機大寫字母組成的字符串，并在文本框中顯示。然后，單擊“排序”按鈕，將此隨機字符串中的各個字母按遞增順序添加到列表框中。

　　程序運行界面如下：

　　[程序]

　　As String

　　Private Sub get_Click()

　　Dim i As Integer

　　Randomize

　　For i = 1 To 10

　　str1 = Trim(str1) & Chr(Int( ___(1)___ ))

　　Next

　　Text1.Text = str1

　　End Sub

　　Private Sub sort_Click()

　　Dim i As Integer

　　Dim j As Integer

　　For i = 1 To 26

　　j = ___(2)___

　　Do While j > 0

　　___(3)___

　　j = j - 1

　　Loop

　　Next

　　End Sub

　　Private Function search(str1 As String, str2 As String) As Integer

　　Dim int1 As Integer, int2 As Integer

　　int1 = 1

　　Do

　　int1 = ___(4)___

　　If int1 = 0 Then Exit Do

　　int2 = int2 + 1

　　int1 = int1 + 1

　　Loop

　　search = ___(5)___

　　End Function (