[填空題] 下列程序?qū)崿F(xiàn)的功能是：在窗體上單擊時(shí)，將在窗體上輸出c:=a1.txt文件中的所有小寫(xiě)字母。

Private Sub Form Click()

Dim Ch As String * 1

Open "c:a1.txt" For Input As #10

Do While 【8】

Ch= Input(1, #10)

If 【9】 Then

Print Ch;

End If

Loop

【10】

End Sub

Not EOF(10) Ch＞＝"a"And Ch＜="z" Close #10

要將a1.txt中的所有小寫(xiě)字母輸出，可采用下述方法：首先讀打開(kāi)該文件，然后從文件中讀取一個(gè)字符，判斷該字符是否為小寫(xiě)字母，若是則輸出該字母，重復(fù)上述過(guò)程直到文件結(jié)尾。在讀字符前應(yīng)要測(cè)試文件內(nèi)部讀寫(xiě)指針是否位于文件尾，只有不是在文件結(jié)尾時(shí)才能讀取字符，故【8】處應(yīng)填“Not EOF(10)”，讀取一個(gè)字符后，應(yīng)判斷該字符是否尾小寫(xiě)字母，故【9】處應(yīng)填“Ch＞＝"a" And Ch＜="z"”，文件讀寫(xiě)過(guò)后，應(yīng)關(guān)閉文件，故【10】處應(yīng)填“Close #10”。