A-A+
下列程序实现的功能是：当在窗体上单击时 将在窗体上输出c:a1．txt文件中的所有小写字母。
问题详情
下列程序实现的功能是：当在窗体上单击时，将在窗体上输出c:a1．txt文件中的所有小写字母。 Private Sub Form_Click() Dim Ch As String*1 Open"c:a1．txt"For Input As 10 Do While【 】 Ch=Input(1，10) If【 】Then Print Ch； End If Loop 【 】 End Sub
请帮忙给出正确答案和分析，谢谢！
参考答案
正确答案：Not EOF(10) Ch＞="a" And Ch＜="z" Close #10
要将a1．txt中的所有小写字母输出，可采用下述方法：首先读打开该文件，然后从文件中读取一个字符，判断该字符是否为小写字母，若是，则输出该字母，重复上述过程直到文件结尾。在读字符前应要测试文件内部读写指针是否位于文件尾，只有不是在文件结尾时才能读取字符，故[13]处应填“NotEOF(10)”，读取一个字符后，应判断该字符是否为小写字母，故[14]处应填“Ch＞="a"AndCh＜="z"”，文件读写过后，应关闭文件，故[15]处应填“Close#10”。
