下列程序实现的功能是：当在窗体上单击时 将在窗体上输出c:/a1．txt文件中的所有小写字母。 Pr
下列程序实现的功能是：当在窗体上单击时，将在窗体上输出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
请帮忙给出正确答案和分析，谢谢！
参考解答
495***263
2023-07-21 09:46:25
正确答案：Not EOF(10) Ch＞='a' And Ch＜='z' Close #10
要将a1．txt中的所有小写字母输出，可采用下述方法：首先读打开该文件，然后从文件中读取一个字符，判断该字符是否为小写字母，若是，则输出该字母，重复上述过程直到文件结尾。在读字符前应要测试文件内部读写指针是否位于文件尾，只有不是在文件结尾时才能读取字符，故[13处应填“NotEOF(10)”，读取一个字符后，应判断该字符是否为小写字母，故[14处应填“Ch＞='a'AndCh＜='z'”，文件读写过后，应关闭文件，故[15处应填“Close#10”。
相似问题
以下程序的执行结果是【 】。 a=15 .5635 b=Int(a*100+0.5)/100 Pri
以下程序的执行结果是【 】。 a=15 5635 b=Int(a*100+0 5) 100 Print b请帮忙给出正确答案和分析，谢谢！
下列程序的功能是：单击窗体时将随机生成10个1～100之间的数 求出它们的总和及平均数。请填空。 O
下列程序的功能是：单击窗体时将随机生成10个1～100之间的数，求出它们的总和及平均数。请填空。 Option Base 1 Private Sub Form_Click() Dim a
下列程序实现的功能是：从键盘上输入10个整数 并把它们写到“D：”盘“a1．dat”文件中 然后从中
下列程序实现的功能是：从键盘上输入10个整数，并把它们写到“D：”盘“a1．dat”文件中，然后从中读出第5个数并输出。 Private Sub Form_Click() Di
语句Static x(7 8)As Double定义了【 】个元素。请帮忙给出正确答案和分析 谢谢！
语句Static x(7，8)As Double定义了【 】个元素。请帮忙给出正确答案和分析，谢谢！
假设窗体中已经有了一个驱动器列表框Drivel和一个目录列表框Dirl 如图20-10所示。当改变了
假设窗体中已经有了一个驱动器列表框Drivel和一个目录列表框Dirl，如图20-10所示。当改变了驱动器列表框中的驱动器时，希望在目录列表框中显示相应驱动器
